• ••• 






• ••• 

• •••••1 

• •••••1 


■ ••••( 
• ••••1 




• •••••( 

• •••••1 

• ••• 


• ••••( 

• ••••1 




• ••• 






• ••0 






• ••• 

• •••••( 

• •••••( 


• ••••< 

• ••••( 




• •••••< 

• •••••< 

• ••• 


• •■••I 




• ••• 






• ••• 

• •••••1 


• ••••( 




•••••• •••••• 


• ••• 


• ••• 


• ••• 




• ••• 


• ••• 




• ••• 






• •••••1 

• •••••< 

• •••••( 




• ••• 




• ••• 


• ••• 




• ••• 


• ••• 


• •••• 


• •••• 


••••••• 






• ••• 


• ••• 


• ••• 


• ••• 


• ••• 


• ••• 


• ••• 


• ••• 


• ••• 




• •••• 


•••••••• 


• ••• 


• •••r 




• ••• 






• ••• 








• ••• 


•••••••• 


• ••• 

• •••••< 

• •••••< 


••••••• 


• •••••< 

• •••••< 

• ••• 


•••••• 

•••••••• 

••••••a 


• ••• 


















• ••• 






• ••• 


• ••• 


• •••• 


• •••• 


••••••• 


•••••• 


••••••••• 


••••••• 


••••••••••a 


• ••• 


• ••• 


• ••• 


• ••• 


• ••• 


• ••• 


• ••• 


• ••• 


• ••• 




• •••• 




• ••• 


• •••r 










•••••• 














• ••• 




• ••• 


• ••• 

• •••••1 

• •••••1 


»••••< 
»••••( 


• ••• 


• •••••1 

• •••••< 

• ••• 


• ••••I 

• ••••1 


• ••• 


• ••• 




• •••• 

• •••• 

• •••• 

• •••• 

• ••• 

• ••• 


• ••• 






• ••• 

• •••••< 

• •••••1 


• ••••< 


>•••••• 

>•••••• 


• •••••1 

• •••••< 

• ••• 


• ••••< 

• ••••< 
• ••• 


••••••• 


• ••• 


• ••• 




• ••• 


• ••• 




•••••• 


• ••• 


•••••• 


•••••• 




•••••• 


•••••• 




•••••• 


•••••• 




•••••• 


• ••• 






• ••• 

••••••4 

••••••1 

• < 
• •••< 


• ••< 


>• 


• •••« 
• < 

••••••1 

••••••a 

• ••• 


• ••< 


>• 

• ••• 


• ••• 




• ••• 


• ••• 




•••••• 


• •••• 




•••••• 


•••••• 




•••••• 


••••••• 




•••••• 




• ••• 


• ••• 


• ••• 


••••• •••• 


• ••• 


•••••• •••• 


• ••• 


• •••1 


»•••••• 










• •••• 


•••••• 

• •••• 


>•• 
>• 


• ••• 



IBM System/3 
Disk Sort 
Reference Manual 



Disk Sort Program Numbers: 

5702-SM1 (Models 8 and 10) 
5703-SM1 (Models 4 and 6) 
5704-SM1 (Model 15) 
5704-SM9 (Model 15) 
5705-SM1 (Model 12) 

CCP/Disk Sort Program Numbers: 
5703-SM2 (Model 4) 
5704-SM7 (Model 15) 
5799-ATF (Models 8 and 10) 
5799-ATG (Model 12) 
5799-ATH (Model 15) 



Program Product 



SC21-7522-8 
File No. S3-33 



Ninth Edition (April 1978) 

This is a major revision of, and obsoletes, SC21-7522-7 and technical newsletters 
SN21-5405, SN21-5511, and SN21-5495. Because the changes and additions are 
extensive, this manual should be reviewed in its entirety. 

This edition applies to the following IBM System/S programs and to all subsequent 
versions and modifications until otherwise indicated in new editions or technical 
newsletters. 



Version Modification Program Number Program Name 



IVlodel 



16 





16 





5 





7 





4 





16 





16 





5 





7 





4 






5703-SIVI2 CCP/Disk Sort Program 4 

5799-ATF CCP/Disk Sort Program 8,10 

5799-ATG CCP/Disk Sort Program 12 

5799-ATH CCP/Disk Sort Program 15 

5704-SM7 CCP/Disk Sort Program 15D 

5703-SM1 Disk Sort Program 6 

5702-SM1 Disk Sort Program 8, 10 

5705-SM1 Disk Sort Program 12 

5704-SM1 Disk Sort Program 15 

5704-SM9 Disk Sort Program 15D 



Changes are periodically made to the information herein; these changes will be reported 
in technical newsletters or in new editions of this publication. 

Use this publication only for the purposes stated in the Preface. 

Publications are not stocked at the address below. Requests for copies of IBM 
publications and for technical information about the system should be made to 
your IBM representative or to the branch office serving your locality. 

This publication could contain technical inaccuracies or typographical errors. 
Address comments concerning the contents of this publication to IBM Corporation 
Publications, Department 245, Rochester, Minnesota 55901 . IBM may use and 
distribute any of the information you supply in any way it believes appropriate 
without incurring any obligation whatever. You may, of course, continue to use 
the information you supply. 



©International Business Machines Corporation 1970, 1971, 1972, 1973, 1975, 1976, 1978 



Technical Newsletter 



®> 



This Newsletter No. SN21-5651 

Date 29 September 1978 

Base Publication No. SC21-7522 

File No. S3-33 

Previous Newsletters None 



IBM System/3 
Disk Sort 
Reference Manual 

©IBM Corp. 1970, 1971, 1972, 1973, 1975, 1976, 1978 

This technical newsletter applies to the current versions and modifications of the applicable IBM 
System/3 programs listed in the edition notice, and provides replacement pages for the subject 
publication. These replacement pages remain in effect for subsequent versions and modifications 
unless specifically altered. Pages to be inserted and/or removed are: 

Cover, Edition Notice 

13, 14 

21,22 

25,26 

91 through 110 

141, 142 

149 through 152 



Changes to text and illustrations are indicated by a vertical line at the left of the change. 

Summary of Amendments 

• Addition of Release/Task Chaining capabilities. 

• Miscellaneous technical and editorial changes. 

Note: Please file this cover letter at the back of the manual to provide a record of changes. 



IBM Corporation, Publications, Department 245, Rochester, Minnesota 55901 

©IBM Corp. 1978 



Printed in U.S.A. 



Technical Newsletter 



®j 



This Newsletter No. SN21-5704 

Date 28 March 1980 

Base Publication No. SC21 -7522-8 
File No. S3-33 

Previous Newsletters SN21-5651 



IBM System/3 
Disk Sort 
Reference Manual 



= IBM Corp. 1970, 1971, 1972, 1973, 1975, 1976, 1978 

This technical newsletter applies to the current versions and modifications of the applicable IBM 
System /3 programs listed in the edition notice, and provides replacement pages for the subject 
publication. These replacement pages remain in effect for subsequent versions and modifications 
unless specifically altered. Pages to be inserted and/or removed are: 

cover, edition notice 

7 through 10 

13, 14 

14.1, 14.2 (added to accommodate 

new and moved text) 
23, 24 
24.1, 24.2 (added to accommodate 

new and moved text) 
45, 46 
69, 70 
107, 108 
123, 124 
147, 148 
157, 158 
161 through 164 



Changes to text and illustrations are indicated by a vertical line at the left of the cha 



nge. 



Summary of Amendments 

MiscellanRous technical changes 

Note: Please file this cover letter at the back of the manual to provide a record of changes. 



IBM Corporation, Publications, Department 245, Rochester, Minnesota 55901 



Printed in U.S. A 



Preface 



This manual helps the System/3 programmer fill out the 
sequence specifications needed in order to run: 

• The System/3 Disk Sort program on System/3 Models 
4,6,8, 10, 12, and 15 

• The System/3 CCP/Disk Sort program on System/3 
Models 4, 8, 10, 12, and 15 

Two coding sheets are discussed in this manual; 

• Sequence Specifications, GX2 1-9089 

• Translation Table and Alternate Collating Sequence 
Coding Sheet, GX21-9096 

The How to Use This Manual section in Chapter 1 explains 
the organization of this book. 

For ease of illustration, many of the examples in this book 
use card-like figures to represent records. This does not 
imply that a card device must be used for input or output 
in these situations. Any of several input/output devices 
might be used, depending on which System/3 model and 
configuration you are using. 



IBM System/3 5448 Disk Storage Drive 

The IBM System/3 5448 Disk Storage Drive on System/3 
Models 8 and 10 uses the same program product support 
as the IBM 5445 Disk Storage. However, a separate system 
control program feature is required for the 5448. In 
general, references to 5445 in this manual also apply to 
5448. For specific information about 5448 operating 
characteristics and programming support, see IBM 
System/3 5448 Disk Storage Drive Program Reference 
Manual, GC21-5168. 



System/3 Model 4 users should note that: 

• System/3 Model 4 is supported by System/3 Model 6 
System Control Programmmg and Program Products. 
The facilities described in this publication for the 
Model 6 are also applicable to the Model 4, although 
the Model 4 is not referenced. 

• Not all devices and features available on the Model 6 
are available on the Model 4. Therefore, Model 4 users 
should be familiar with the contents of the IBM 
System /3 Model 4 Introduction, GC21-5146. 

• All references to the 5444 disks on systems without 
3340 Direct Access Storage Facility also apply to the 
5447 disks unless otherwise rioted. 

System/3 Model 8 useis should note that: 

• The System/3 Model 8 is supported by System/3 
Model 10 Disk System System Control Programming and 
Program Products. The facilities described in this publi- 
cation for the Model 10 are also applicable to the 
Model 8, although the Model 8 is not referenced. 

• Not all devices and features available on the Model 10 
are available on the Model 8. Therefore, Model 8 users 
should be familiar with the contents of the IBM 
System/3 Model 8 Introduction, GC21-51 14. 

System/3 Model 10 Disk System users should note that: 

• In this publication the System/3 Model 10 Disk System 

is termed the Model 1 0. Without exception, all references 
to Model 10 apply to the Model 10 Disk System. 



System/3 CCP/Disk Sort Program for Models 8, 10, 
12, and 15 



Appendix I points out the differences between the CCP/ 
Disk Sort Programs for Models 8, 10, 12, and 15 and the 
corresponding Disk Sort Program for these systems. 



System/3 Models 1 2 and 1 5 users should note that: 

• The IBM 3340 Direct Access Storage Facility attaches 
to the System/3 Model 1 2 and to the System/3 
Models 15B, 15C, and 15D. 

• The IBM 3344 Direct Access Storage attaches to the 
System/3 Model 15D. 

• Certain areas on the 3340 and 3344 disks are treated as 
5444 disks. These areas are known as 5444 simulation 
areas and are used for the program libraries and can be 
used for data files. The remainder of the disk space is 
known as the main data area and can only be used for 
data files. 

• References in this manual to the 5444, 5445, and 3340 
are to be interpreted according to which disk storage 
device(s) is(are) attached to your system. The following 
table is used to determine the meaning of the reference: 
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Model 
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Model 
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(Model 10) 










5445 Disk 










Storage 








3340 


Not 


Not 


Main data area 


Main data area on 




applicable 


applicable 


on 3340 


3340 or 3344 



Ail references to the System/3 Model 15 in this manual 
apply to all models of Model 15 as specified below 
unless otherwise indicated: 

- For Disk Sort, program number 5704-SM1 for 
Models 1 5A, 1 5B, and 1 5C; and program number 
5704-SM9for Model 15D. 

- For CCP/Disk Sort, program number 57Q4-SM7 
for Model 15D. 



For further information, see the appropriate publication 
listed under Related Publications; for more information 
about the manuals or the coding sheets, contact your 
nearest IBM branch office. 
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Chapter 1. Introduction 



This publication is designed to help you, the programmer, 
use System/3 Disk ESort and System/3 CCP/Disk Sort. The 
CCP/Disk Sort Program is used with the Communications 
Control Program on the System/3 Model 4 with Program 
Number 5703-SM2 and Model 15 with Program Number 
5704SM7. 



HOW TO USE THIS MANUAL 



A column summary and column descriptions are provided 
for each type of specification: 

• Header 

• Record type 

• Field description 



Your need for reference material varies with programming 
experience and familiarity with a particular system. This 
manual contains four different levels of information; 

1 . Overview of Sequence Specifications shows which 
columns on the sequence specifications sheet you 
must consider when you want to sort a disk or tape 
file. 

2. Column Summaries list the possible entries for each 
column on the sequence specification sheet. 

3. Column Descriptions explain the possible entries 
for each column in greater detail. 

4. Sample Jobs show how to fill out the sequence 
specification sheets for typical jobs.' 

Here is how to use each level: 



Important Information for Users of System/3 
CCP/Disk Sort 

System/3 CCP/Disk Sort users should review Appendix H 
prior to coding your program for the following reasons: 

• If you are knowledgeable with System/3 Disk Sort 
programming and System/3 CCP, Appendix H illus- 
trates the CCP/Disk Sort differences your coding must 
reflect. 

• Appendix H provides a CCP/Disk Sort overview. For 
more details, refer to the chapter discussions. 

• If you are a first time user of System/3, System/3 Disk 
Sort, or System/3 CCP/Disk Sort, Appendix H provides 
an orientation to System/3 CCP/Disk Sort for your 
System/3 Model 4 (5703-SM2) or Model 15 with 
Program Number 5704-SM7. 



• Use the Overview to see which columns on the sequence 
specifications sheet you must consider when you want 
to sort a disk or tape file. 

• Use the Column Summaries for a quick recall of the 
possible entries for each column on the sequence speci- 
fications sheet. 



Additional information on System/3 CCP/Disk Sort 
Programs for System/3 Models 8 and 10 (5799-ATF), 
System/3 Model 12 (5799-ATG), and System/3 Models 
1 5A, 1 5B, and 1 5C (5799-ATH) is provided in Appendix I . 



• Use the Column Descriptions when you need a detailed 
explanation of the entries for a particular column. 

• Use the Sample Jobs to review coding techniques for 
actual jobs.' 



'See Appendix H for CCP/Disk Sort differences. 
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SYSTEM CONFIGURATION 

For information concerning the minimium system configur- 
ation for disk sort and additional devices supported, see 
one of the following publications, as appropriate for your 
System/3 model: 

• IBM System/3 Models 4, 6, 8, 10, and 12 System 
Generation Reference Manual, GC21-5126 

• IBM System/3 Model 15 System Generation Reference 
Manual, GC21-7616 

• IBM System/3 Model 6 Introduction, G A21 -91 22 

• IBM System/3 Model 8 Introduction, GC21 -5114 

• IBM System/3 Model 12 Introduction, GC21 -51 1 6 

• IBM System/3 Model 15 Introduction, GC21 -5094 



With the IBM Disk Sort or CCP/Disk Sort (also see Appen- 
dix H) Program you can: 

• Rearrange the records in a disk or tape file: 
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Drop records from a disk or tape file: 
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• Reformat the records in a disk or tape file: 
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Here is how the Disk Sort or CCP/Disl< Sort Program worl<s 
with the records in your file: 

1. Disk sort reads a record from the input file: 



The work record disk sort builds would look like this: 



1 5 


6 26 


27 30 








Control field A 


Data 


Control field B 



Note: Control fields are the fields you want disk sort to 
use to sort the records. See Column 7 under Field Descrip 
tion Specifications for a detailed discussion of control fields. 

2. Disk sort checks your sequence specifications to see 
whether the record is one you want to sort (often 
you may not want to sort all the records in the file). 



1 4 


5 9 10 




30 








* 


Control field B 


Control field A 


Data 





See Column 7, Field Description Specifications for 
a more detailed discussion of the work record. 

If you are not dropping control fields, they will al- 
ways precede data fields in the work and output 
records (see Column 28— Header Specifications for a 
discussion of dropping control fields). 

Disk sort writes all the records you want to sort into 
the work file. 



If the record is one you want to sort, disk sort builds 
a work record, formatting it according to your sequence 
specifications (the format of the work record is im- 
portant because it controls the format of the output 
record). 

Assume that your sequence specifications say: 

a. Put the contents of positions 27-30 in the input 
record into positions 1-4 of the work record. 

b. Put the contents of positions 1-5 in the input 
record into positions 5-9 of the work record. 

c. Put the contents of positions 6-26 in the input 
record into positions 10-30 of the work record. 



5. Disk sort checks your sequence specifications to see 
how you want to arrange the records in the output 
file (ascending or descending order by control fields). 

6. Disk sort writes the records in the output file in the 
order you have specified. The only exception is when 
you want to drop control fields from the output 
record. 



THE THREE TYPES OF SORT: ADDROUT, TAG 
ALONG. AND SUMMARY TAG ALONG 



The output for a tag along sort is a file of sorted records. 
The sorted records can contain: 



There are three types of sort jobs: addrout (address out), 
tag along (data fields can tag along with control fields 
in the sorted records), and summary tag along (data is sum- 
marized in the sorted records). 

The output from an addrout sort job consists of 3-byte 
binary relative record numbers of the records in the input 
file. 



• Control fields and data 

• Control fields only 

• Data only 



o 

^ / 

5; \ 



Employee master file 



175 $3.50 



171 S4.00 



167 $3.15 



150 $3.00 



116 $4.00 




( Disk sort progtam J 







175 








171 










167 








150 








116 


— 






Control fields and data 



Control fields only 



Data only 



Record addresses only 



Tag along sort 



Addrout sort 
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The output for a summary tag along sort is a file of sorted 
records. The sorted records can contain: 

• Control fields, data fields, and summary data 

• Control fields only 

• Data fields and summary data 

• Summary data fields only 



RUNNING THE DISK SORT OR CCP/DISK SORT 
PROGRAM 



Input 




Processing 



Output 



Sequence 
specifications' 



File to be 
sorted ' 



Disk Sort program 



Work file" 



Sorted file'' 



OCL statements are your instructions to the computer. 

Sequence specifications are your instructions to the disk sort 

program. 

■ File to be sorted can be an indexed, sequential, or direct disk 

file, or a sequential tape file (or card or 3741 diskette file for 

Mode! 15). 
4 
Work file is an area on disk where disk sort writes all the records 

you want to sort. Ttie program can then work with the records 
there without disturbing the input file. 
Sorted file can contain: 

3 The relative record numbers of the records in the file 
b. Part or all of the records themselves (forming a sequential 
file) 



SEQUENCE SPECIFICATIONS SHEET 

The sequence specifications slieet contains tliree different 
kinds of specifications: header, record type, and field 
description. The sannple specifications sheet below shows 
the location and purpose of all three. 



IBM 



'Trri 



SEQUENCE SPECIFICAHONS 
Headef 



Here you specify the type of sort job you are going to run. 



zitz^mmmit: 



Record T ype 



Here you specify which of the file's records you want to sort. 



Header specifications 



Here you specify how you want the records sorted. 



Record type specifications 



Field description specifications 
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Order of Sequence Specifications 

The normal order of sequence specifications is: 

1 . Header line 

2. Record type lines 

3. Field description lines 

This order can vary, however, depending on how many 
records you want to sort and the format of those records 
(format refers to the locations, lengths, and types of fields 
in a record). If, for example, you want to sort all the records 
in a file - and they all have the same format — you do not 
have to fill out record type specifications (this is often re- 
ferred to as implied include-all). 



Number of Records 
to Be Sorted 


Format of Records 
to Be Sorted 


Order of Sequence Specifications 


All the records in 
the file (implied 
include-all) 


All the same 


1. Header Ime 

2. Field description lines 


Some of the 
records in the file 


All the same 


1. Header line 

2. Record type lines 

3. Field description lines 


All or some of 
the records in 
the file 


Several 

different 

formats 


1. Header line 

2. Record type lines 1 For first type of 

3. Field description lines ) record format 

4. Record type lines 1 For second type 

5. Field description lines ^ of record format 

6. Record type lines f One set for each additional 

7. Field description lines \ type of record format ' 


'This does not mean that the records in the file must be grouped by format type. The sequence specif- 
ications must be grouped (one set of record type and field description lines for each format type). The 
records themselves can be in any order. 



For detailed information on how to include or omit certain 
records when you are sorting a file, see Column 6 under 
Record Type Specifications. 



How to Supply Sequence Specifications 

You can supply the sequence specifications from: 

• The device you are using to supply the OCL statements 

• An OCL procedure containing the LOAD, FILE, and 
RUN statements for the job (the OCL procedure may or 
may not contain other jobs) 

• A source library module 



Appendix B summarizes: 

• The advantages and disadvantages of each of these 
methods 

• The interrelationship of the three methods of supplying 
sequence specifications and three of the OCL cycles 
(LOAD, BUILD, and CALL) 

Note: Regardless of the method used to read the sort 
specification statements, the system input device is 
dedicated to the partition in which the sort is running 
until all such statements are read. 



OCL STATEMENTS 

Before your system can run a sort job, it needs certain in- 
fornnation about the disk sort program, the sequence speci- 
fications for the job, and the files involved in the job (every 
sort job uses a minimum of three files: an input file, a work 
file, and an output file). You supply this information in 
OCL statements. Here is the information you must supply: 

About the Sequence Specifications 

1 . How you are going to enter the sequence specifications 
(for example, keyboard for the Model 6, MFCU for 
the Model 10, 1442 or MFCU for the Model 1 2, or 
display station or MFCU for Model 15). 

2. Where you want any computer-to-operator messages 
printed. 

About the Program 

1 . Name of the program you want to run ($DSORT). 

2. Disk drive location of the disk sort program. 
About the Input File 

1. Name of the file you want to sort. The Fl LE state- 
ment name must be INPUT (or INPUT1, ..., IN- 
PUTS for Model 1 2 or Model 1 5) . However, if the 
file name is not INPUT (or INPUT1, . . . , INPUTS 
for Model 12 or Model 15). use the LABEL key- 
word to identify the actual file name. 

2. Unit ascignment of the file you want to sort: 

a. All Models Except Model 4: Removable disk 1 
or 2 (R1 or R2) or fixed disk 1 or 2 (Fl or F2) 
for the 5444 

Model 4: Removable disk R1 or fixed disk R2, 
Fl, or F2for the 5447 

b. Model 10: Drive 1 or 2 (D1 or D2) for the 5445 
and the 544S. 

c. Model 12: Drive 1 or 2 (D1 or D2) for the 3340 
main data area 

d. Model 15: Drive 1, 2, 3, or 4 (D1, D2, D3, or 
D4) for the 5445 or 3340 

e. Model 15D: Drive 3 [D31 (D3), D32, D33, 
and D34] or Drive 4 [D41 (D4), D42, D43, 
and D44] for the 3344. 

f. Drive 1 , 2, 3, or 4 (T1 , T2, T3, or T4) for tape 

g. Also supported on the Model 15 are MFCU, 
MFCM, 1442, 2501, and 3741 

h. If the file is spooled to disk, sort uses the file 
as if it were coming from the device of 
original entry. 
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3. Name of the disk pack or tape that contains the file. 

4. If you use tape, specify UNIT, BLKL, and RECL. 

5. If you use the 3741, specify RECL (Model 15 only). 



About the Work File 

1 . Name of the file you are going to use as a work area. 
The Fl LE statement name must be WORK, however, 
if the name of your file is not WORK, use the LABEL 
keyword to indicate the actual name of the file. 

2. Disk drive location (unit) of the work file: 

a. All Models Except Model 4: Removable disk 1 
or 2 (R1 or R2) or fixed disk 1 or 2 (Fl or F2) 
for the 5444 

Model 4: Removable disk R1 or fixed disk R2, 
F1,or F2 for the 5447 

b. Model 10: Drive 1 or 2 (D1 or D2) for the 5445 
and the 5448. 

c. Model 12: Drive 1 or 2 (D1 or D2) for the 3340 
main data area 

d. Model 15: Drive 1, 2, 3, or 4 (D1, D2, D3, or 
D4) for the 5445 and 3340 

e. Model 15D: Drive 3 [D31 (D3), D32, D33, 
and D34] or Drive 4 [D41 (D4), D42, D43, 
and D44] for the 3344. 

3. Name of the disk pack that contains the file. 

4. Number of tracks in the file. (Do not specify number 
of records.) 

5. Status of the file. The work file should be a scratch 
file since you won't need its information after a sort 
job. 

Note: The work file must be online at all times during the 
sort run. 



If the file you want to use is an old (temporary) file, you must 
also supply the location at which the file begins. 
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About the Output File^ 



Input: Model 6 and Model 10 



1. Name you are going to call the sorted file. The FILE 
statement name must be OUTPUT; however, if the 
name of your file is not OUTPUT, use the LABEL 
keyword to indicate the actual name of the file. 

2. Unit assignment of the sorted file: 

a. All Models Except Model 4: Removable disk 1 
or 2 (R1 or R2) or fixed disk 1 or 2 (F1 or F2) 
for the 5444 

Model 4: Removable disk R1 or fixed disk R2, 
F1, or F2 for the 5447 

b. Model 10: Drive 1 or 2 (ID 1 or D2) for the 5445 

c. Model 12: Drive 1 or 2 (D1 or D2) for the 3340 
main data area 

d. Model 15: Drive 1, 2, 3, or 4 (D1, D2, D3, or 
D4) for the 5445 or 3340 

e. Drive 1, 2, 3, or 4 (T1, T2, T3, or T4) for tape 

f. Model 15D: Drive 3 [D31 (D3), D32, D33, 
and D34] or Drive 4 [D41 (D4), D42, D43, 
and D441 for the 3344. 

3. Name of the disk pack or tape on which you are 
going to put the sorted file. 

4. Number of records or tracks in the file. 

5. Status of the file. If the file exists before this sort, 
it cannot have permanent status. If the file is built 
dLiring the sort, it can have temporary or permanent 
status. 

6. If tape is used, UNIT, BLKL, and RECL must be 
specified. 

Notes: 

1. You may not have your output file deferred if it is a 
split cylinder file. 

2. If the E:I\ID parameter is not used, disk sort defaults 
to rewinding and unloading tape files. 

File Considerations 

Input: General 



The FILE statement name must be INPUT. However, the 
actual file need not be called INPUT because the LABEL 
keyword allows you to identify the tile you will be sorting. 
The input file may be multivolume (online or offline). 
However, for SORTA jobs, when the input tile is processed 
by an RPG II program with your sorted addrout file, the 
input file must be online. 

The volumes containing the INPUT file must be mounted 
online prior to running disk sort. However, if the input 
file is offline multivolume, (more than one volume assigned 
to a removable unit), only the first volume assigned to each 
unit is required to be mounted. If the input file is not on- 
line prior to running, the job will end with message SD 
105 (INPUT FILE NOT ONLINE) followed by a CD45 
halt (Model 6) or a 25 halt (Model 10). 

If your input file is ASCII and ASCI I -YES is not specified 
on the input file card, all data is treated as if it is EBCDIC. 
EBCDIC and ASCII data cannot be mixed in a sort run. 
An ASCII input file requires an ASCII output file and an 
EBCDIC input file requires an EBCDIC output file. 

When ASCII is specified for input and output, packed data 
should not be specified in the sort specifications since 
ASCII does not support packed data. 

Variable-^length blocks are not allowed by disk sort tape 
I/O; the job will end if they are encountered. 



Multiple Input: Model 6 and Model 10 

Disk sort supports multiple file input to the same extent 
that System/3 data management supports multiple file 
input. For more information on this subject, see the rnulti- 
volume file discussion in the IBM System/3 Mode! 10 Disk 
System Control Programming Reference Manual, 
GC21 -7512 or the IBM System/3 Model 6 Operation Con- 
trol Language and Disk Utility Programs Reference Manual, 
GC21-7516. 



The input file contains records to be sorted. Any file 
created by System/3 data management can be used as input 
to disk sort; for example, an RPG II file or a file from a 
previous disk sort run. The disk file may have been created 
by any processing method - sequential, indexed, or direct. 
A tape file must have been created sequentially. Since 
direct file areas are set to blanks before the file is created, 
you should test for and omit blank records. You can do 
this by testing a position that is known never to contain 
blanks. 



If the file you want to use is an old (temporary) file, you must 
also supply the location at which the file begins. 



Restrictions for multiple file input to disk and tape files are. 

Disk Multiple File Input: Multiple files can be used as 
input if they are made to appear as multivolume files with 
the following restrictions; 

1 . Labels must all be the same. 

2. Record lengths must all be the satne. 

3. Files reside on different packs. 
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Tape Multiple File Input (Model 10): Multiple files can be 
used as input if they are specified as multivolume files with 
the following restrictions: 

1. RECL and BLKL must be the same. 

2. Record format must be the same. 



Special Considerations: When more than one input file is 
used, the following must be considered: 

• Addrout sort is not allowed. 

• Auto allocation of the work file should be used with 
caution. For best performance, use a work file statement. 



3. Unlabeled or nonstandard tape files. 

4. Files must have the same attributes (such as, use of a 
9-track, 7-track, ASCII, EBCDIC, parhy, density, 
CONVERT, or TRANSLATE). 

Note: Standard labeled tape files cannot be used for 
multiple file input. 

Input: Model 12 

Input can be from either of the following devices: 

• 3340 Direct Access Storage Facility 

• 3410/3411 Magnetic Tape Subsystem 



• The record lengths of all disk or tape files must agree. 
This is not true for block lengths. Tape files may have 
different block lengths. 



Data Considerations: When running in a multiple device 
mode, the data restrictions for any one input device apply 
to all input devices. For example, if disk input is combined 
with a 7-track translate input file, packed fields should not 
be used in the disk sort specifications since a 7-track trans- 
late record can contain only the System/3 64-character set. 

Input can be mixed EBCDIC and ASCII with either 
EBCDIC or ASCI I output. However, when ASCII is specified, 
packed data should not be specified in the disk sort specifica- 
tions since ASCII does not support packed data. 



Up to eight files can be used as input using any combination 
of the preceding devices. The file names must be: INPUT 
or INPUT1 (but not both), INPUT2, INPUT3, INPUT4, 
INPUT5, INPUTS, INPUT7, and/or INPUTS. 

The files will be processed INPUT (or INPUTl) serially to 
I NPUT8 regardless of the order of the OCL F i LE state- 
ments. The lowest numbered input file will be processed 
fully first, then the next numbered input file will be 
processed in its entirety, then the next until all the files 
have been individually processed in sequence. For a particu- 
lar disk sort run, the input files do not have to be numbered 
serially; that is, the file names may be INPUTS, INPUTS, 
and INPUTS, or a particular run could have just INPUTS 
as the input file. 

All single-volume disk files must be online prior to running 
disk sort. However, when using multivolume offline disk 
files, only the first volume assigned to each unit must be 
mounted prior to running disk sort. When using 3340 
multivolume offline disk files, D1 cannot be used. 

Input record length is defined as the record length used 
for the disk and/or tape files. 
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Input: Model 15 

Input can be fronn any of the following devices: 

• 5444 Disk Storage Drive 

• 5445 Disk Storage 

• 3340 Direct Access Storage Facility 

• 3344 Direct Access Storage (Model 15D only) 

• 3410/3411 Magnetic Tape Subsystem 

Note: For the following devices, use a device independent 
FILE statement. 

• 1442 Card Read Punch 

• 2501 Card Reader 



Input record length is defined as the record length used for 
the disk and/or tape files. If the 3741 and/or cards are the 
only input, tiie input record length is the largest specified 
for the 3741 or 80 or 96 for card input — whichever is 
largest. 



Special Considerations: When more than one input file is 
used, the following must be considered: 

• Addrout is not allowed. 

• Auto allocation of the work file should be u.sed with 
caution. For best performance, use a work file 
statement. 

• The record lengths of all disk (5444, 5445, or 3340) 
or tape files must agree. This is not true for block 
lengths. Tape file may have different block lengths. 



• 3741 Data Station or 3741 Programmable Work Station 
directly attached 

• 2560 Multi-Function Card Machine (MFCM) 
or 

5424 Multi-Function Card Unit (MFCU) 

Up to eight files can be used as input using any combination 
of the preceding devices. The file names must be: I NPUT 
or INPUT1 (but not both), INPUT2, INPUT3, INPUT4, 
INPUT5, IIMPUT6, INPUT7, and/or INPUTS. 

The files will be processed INPUT (or INPUT1 ) serially to 
INPUTS regardless of the order of the OCL FILE state- 
ments. The lowest numbered input file will be processed 
fully first, then the next numbered input file will be proces- 
sed in its entirety, then the next until all the files have been 
individually processed in sequence. For a particular disk 
sort run, tiie input files do not have to be numbered serially; 
that is, the file names may be INPUT3, INPUT5, and IN- 
PUTS, or a particular run could have just INPUTS as the 
input file. 

Card input files will have a record-length characteristic of 
the device. If card input files are used with disk or tape files, 
the card input is truncated or padded on the right with 
blanks to the record length specified for the disk or tape 
files. 

Single-volume disk files need not be online prior to running 
disk sort. However, when using multivolume offline disk 
files, the first volume assigned to each unit must be mount- 
ed prior to running disk sort. When using 3340 multivolume 
offline disk files, D1 cannot be used. 



Data Considerations: When running in a multiple device 
mode, the data restrictions for any one input device apply 
to all input devices. For example, if disk input is com- 
bined with 5424 MFCU input, packed fields should not be 
used in the disk sort specifications since 96-colurnn cards 
can contain only the System/3 64-character set. 

Input can be mixed EBCDIC and ASCII with either 
EBCDIC or ASCII output. However, when ASCII is speci- 
fied, packed data should not be specified in the disk sort 
specifications since ASCII does not support packed data. 



Considerations for Writing the Output File Over the Input 
File: If the output file is to be written over the input file 
(load to old), the output file will be scratched at the end of 
job under the following conditions, as though RETAIN-S 
had been specified for the output FILE statement: 

1 . A pack containing an input file is not online at the 
start of the job (deferred mount) 

2. RETAINS is used on the FILE statement for the 
input file 

To avoid this problem, use RETAIN-Tfor the input FILE 
statement. 

CAUTION 

When running disk sort program (5704-SM9) using output 
over input, take care to ensure that another partition does 
not share the file to be overlaid during sort execution. 
If this condition occurs, sort may not be able to reopen 
the file as an output file at output time. This may result 
in an unrecoverable halt. 
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Work File 



Automatic Worl< File Allocation 



The work file is generally an area on disk which you have 
set aside as a work area. The disk sort program uses this 
area as working storage during the sorting process. 

The FILE statement name must be WORK. If the name of 
the work area is not WORK, use the LABEL keyword to 
indicate the file you will be using. 

A work file should be given scratch status (RETAIN-S), be- 
cause it is normally created during the sort and has no func- 
tion afterwards. It is always allocated with a multivolume 
attribute, even though its FILE statement may indicate 
single volume. 

The work file may be multivolume, but all of the volumes 
must be online. If either the input or output files are multi- 
volume offline, the removable units containing these multi- 
volume offline files may not be used for the work file. 

The work file may be specified on the 5444 or 5445 drives 
but not on both. An error occurs if work files are allocated 
on both 5444 and 5445 drives. 

When specifying the work file on the 3340 (Model 12 and 
Model 15), be certain to specify only the 3340 main data 
area or the simulation area, but not both. 

When a new output file is specified and a work FILE state- 
ment is given with the same unit as the output file, a halt 
can occur. The halt is issued when the space allocated for 
the work file overlaps the area where the new output file is 
to be located. To avoid the halt, either omit the work 
FILE statement and let automatic allocate handle the work 
file or specify locations for both the work file and new out 
put file. 

Disk sort work files are opened with multivolume file 
attributes. If RETAIN-S is used for sort with Model 15 
data packs, no problems are encountered. However, if a 
System/3 Model 6 or Model 10 data pack is used on Model 
I 5 and a nonmultivolume file is attempting to overlay an 
old System/3 work file and you are using all the original 
work FILE parameters (LABEL, TRACKS, LOCATION, 
etc), a terminal error will occur. 

When a work file statement is specified on Model 15 
systems for 3340s (D1, D2, D3, D4), the verify option is 
taken from the file statement. Column 34 of the sort 
header statement is ignored. 



If the Fl LE statement is omitted from the disk sort OCL, 
disk sort uses the automatic allocation function to allocate 
from one to a maximum of four scratch areas, each on 
a different drive. If four scratch areas are not available, 
disk sort attempts to allocate three, and so on. The scratch 
areas are allocated from: 

1. Available 5445 packs or 3340 areas 

2. Available 5444 fixed and removable packs 

Note: See chart in the preface of this manual for the disk 
storage drives applicable to a particular system. 

The first choice of the automatic allocation function is the 
5445 Disk Storage or the 3340 Direct Access Storage 
Facility. If a 5445 or 3340 cannot be used, automatic 
allocation tries to find space on the 5444 disks. 

Automatic work file allocation uses scratch areas from the 
available disk packs. A disk pack is considered available 
if the pack does not need to be removed while disk sort 
is executing. 

On any given drive, the automatic allocation selects 
the largest contiguous disk area available. Therefore, a 
job being executed in another program level or partition 
may not find enough disk space available. This condition 
can be minimized to some extent if the disk packs have 
been fragmented, that is, if a file is intentionally located 
in the middle of a pack, there will be two contiguous areas 
instead of one. The degree of pack fragmentation and the 
location of the fragmented files must be evaluated by each 



All automatically allocated scratch areas (work file areas) 
are returned to system use after the disk sort run is 
completed. 

Notes: 

1 . Disk sort may exhaust the work areas selected by 
automatic work file allocation. When this occurs, 
sort issues the message WORK FILE TOO SMALL. 
To bypass this condition, increase the size of the free 
areas or specify the work area with a FILE statement. 

2. When running a disk sort job using automatic work file 
allocation, never change packs unless requested to do so 
by a message. 

3. The verify option in column 34 of the header statement 
applies to any automatically allocated work file. 
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Automatic Work File Allocation with Multiple File Input 
(Model 12 and Model 15) 

If more than one input file is assigned to a specific device 
type (5445 or 3340 or the 5444), then any unit of that 
type that contains an input file will not be used for auto- 
matic work file allocation. 

For example, if filename INPUT is assigned to unit D1, 
INPUTS to unit R2, and INPUT7 to unit D2, units Dl'and 
D2 are not available for automatic allocation since more 
than one file is assigned to the 5445. 

Note: Unit R2 is available since only one input file was 
assigned to that device type. 

Directed Automatic Work File Allocation 
(Model 12 and Model 15) 



When requesting a 5444 directed automatic allocation, U1 
must be 0; U2 must be I ; and U6, U7, and/or U8 can be 
set to 1. 

Note: For a 5444 directed automatic allocate, F1 is always 
considered available for automatic allocation of the work 
file. If U6, U7, and U8 are all set to 0, then only F1 is 
considered for automatic allocation of the work file. 

When requesting a 5445/3340 directed automatic alloca- 
tion, Ul and U2 must be set at 1 and at least one of U5, 
U6, U7, and U8 must be set to 1 . 

For example, if you want to direct automatic allocation of 
the work file to D1 and D2, the SWITCH statement would 
be: 

//SWITCH 11001100 



In order to limit or select the 5444, 5445, 3340, or 3344 
drives that are available to disk sort for automatic work file 
allocation, you can use a SWITCH OCL statement. The 
SWITCH statement consists of eight characters; one for 
each of the eight external indicators (U1-U8). The first 
or leftmost character gives the setting of indicator Ul; the 
second gives the setting of U2; and so on. 



File 
Allocation 


Indicator 


U1&U2 


U3 


U4 


US 


U6 


U7 


U8 


5444 directed 

5445/3340 
directed 


01 
11 


X 
X 


X 
X 


X 

D1 


R1 
D2 


R2 
D3 


F2 
D4 


X = Not used 











Ul and U2 = 


00 




01 




10 




11 


U3and U4 




U5, U6, U7, 




and U8 





No request 

5444 directed automatic allocate 

is requested 

No request 

5445/3340 directed automatic 

allocate is requested 

Not used 

When set to a 1 , the unit requested 
is considered available for auto 
allocation of the work file 



To direct automatic allocation to Rl and Fl, the SWITCH 
statement would be: 

//SWITCH 01000100 

The SWITCH statement must be included after the LOAD 
or CALL statement and before the RUN statement. 

Directed automatic allocate does not ensure that space is 
available on the desired drives; it only directs disk sort 
requests for work space to these drives. 

The size of the work space depends on the number of input 
records and the size of the record through the intermediate 
passes. Because space allocation occurs prior to sort 
generation, estimates of the size of the work files are not 
known when the space is allocated. Therefore, when 
automatic allocate is used, it is quite possible that more 
space will be allocated than is necessary. 

If the units indicated on the SWITCH statement for a 
5445/3340 directed automatic allocate are not available, 
automatic allocation takes place on all available 5444 
packs. 

If the directed automatic work file allocation is used for 
a job, an appropriate SWITCH OCL statement must be 
included with the disk sort OCL statements. It is the 
presence of a SWITCH OCL statement that determines 
if directed allocation is used. If there is no SWITCH OCL 
OCL statement, the external indicators are not tested. 
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When drive 3 (or 4) is specified for a 3344, all main data 
areas on that drive will be searched for space. For example, 
if no FILE statement is present and if the SWITCH 
statement is // SWITCH 1 1 XX001 0, disk sort looks for 
work space only on drive 3. D31 is searched first, then 
D32, then D33, and finally D34, 

If two or more drives are specified, the search for work 
space alternates. For example, if no FILE statement 
is present and if the SWITCH statement is 
//SWITCH 11XX0110, disk sort looks for work space 
on drive 2 and drive 3. The highest numbered drive, D3 
in this example, is searched first. If space for one scratch 
area (even a single track) is found on D31, then D2 is 
searched, followed by D31 again, and then D32, D33, and 
D34 in that order. 



Output File 

The output file contains the sorted file. The disk file can 
have sequential organization only. Output of the program 
is in one of three formats: 

• Tags or addrout 

• Tag along 

• Summary tag along 
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The tile statement name must be OUTPUT. The LABEL 
keyword can be used to identify the actual file being used. 

if the (juTput file exists before the sort (it is old), it cannot 
have peimanent status since you cannot write into a perm- 
anent file. H,>wever, if the output file is built during the 
sort, it can have permanent or temporary status. 

The ouipui file may be multivolume (online or offline). 
Howevtr, for SORTA jobs, when the input file is processed, 
the sorted addrout file must be online. 

Deferred mounting of the output file is allowed (notice that 
this does no! refer to the system OCL DEFER parameter). 
This means that the output file does not have to be online 
prior to running disk sort. The output file specified in the 
FILE statement may be old or new. 

One use of deferred output mounting is to use the same re- 
movable unit(s) for both the input and output files, but 
with the input and output files on different packs. In this 
case, the shared removable units may not be used for the 
v\/ork file. For example: 
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In this case, pack AAAAAA must be mounted on R1 prior 
to running disk sort. The mounting of pack BBBBBB on 
R1 is deferred until later. R1 may not be used for the work 

file. 

Disk SOI I defaults to rewinding and unloading tape files. 

Variable length blocks are not allowed by disk sort tape 
I/O; the job ends if they are encountered. 

Note: In the output file, the ordei of records having dupli- 
cate control fields is unpredictable. This does not imply 
that the output is incorrect, however, since the control 
fields were in order. 



7-Track Tape Considerations 

If nonstandard and unlabeled tapes are used, extreme care 
must be taken when creating a file using converter, trans- 
lator, and parity parameters. Since no labels are given with 
block and record sizes on this type of tape, identical Fl LE 
statements are necessary each time the 7-track tape is used 
as input for a job. If an error does occur, disk sort cannot 
recognize the error. No diagnostic is given. 

If standard labeled tapes are used, identical FILE statements 
are still necessary each time the same 7-track tape is used 
as input for another job. Since there are labels giving block 
and record sizes, disk sort can diagnose errors if identical 
FILE statements are not given. 



If 7-track tape is used for either input or output, the con- 
verter or translator must bs used. Refer to the /BM 
System /3 Models 8, 10, 12, and 15 Components Reference 
Manual, GA21-9236, for a discussion of the converter and 
the translator. 
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The translator cannot be used if output is 7-track tape and 
packed data or summary data specifications are used. 

If input is 7-track tape with the translator on, then include, 
omit, and field specifications with packed data are not 
allowed. 

If SORTA (addrout) sort is specified, output cannot be 
7-track tape. 



How to Supply OCL Statements for the Model 6 

Installations without an Online Data Recorder or a 374 1 
Data Station: If your installation does not have an online 
data recorder or a 3741 Data Station, you will use conversa- 
tional OCL to give the system the information it needs to 
run the disk sort program. 

Appendix A summarizes: 



9-Track Tape Considerations 



Which OCL cycle to use (depending on the type of sort 
you want to do) 



A terminal error occurs if the tape f lie is ASCI I and 
ASCII-YES is not specified for both the input file and the 
output file. 

If the output for a SORTA (addrout) sort is to be on tape 
and ASCII translate has been specified, a terminal error is 
generated and the sort job ends. 

For tape output from an addrout sort, the logical record 
length (RECL-on file statement) must be 18 positions. 



Restrictions on the Use of Multifile Tapes (Model 15) 

You must adhere to the following restrictions when using 
multifile tape volumes: 

1 . All files in the volume must be labeled in the same 
manner; that is, all must be standard labeled files or 
all must be unlabeled files. 

2. All files in the volume must be recorded in the same 
density. 

3. All files in the volume must be recorded in the same 
mode (translate, convert, or parity). 



• How to respond to the keywords in each cycle 

Installations with an Online Data Recorder or 374 1 Data 
Station: If your installation has (1 ) an online data recorder 
(IBM 5496 Data Recorder or IBM 129 Data Recorder), (2) 
a directly attached 3741 Data Station, or (3) a directly 
attached 3741 Programmable Work Station, you can also 
supply OCL statements on 96-column punched cards, 80- 
column punched cards, or 96-byte diskette records. 

The IBM System/3 Model 6 Operation Control Language 
and Disk Utility Programs Reference Manual, GC21 -751 6, 
explains how to code OCL statements on cards. To supply 
OCL statements on cards, you must establish the data 
recorder as the OCL input device. Instructions on how to 
do this are contained in the IBM System/3 Model 6 Oper- 
ator's Guide, GC21 -7501 . To supply OCL statements from 
a diskette, refer to the IBM System /3 3741 Reference 
Manual, GC21-5113. 

With or without an online data recorder, OCL statements 
and error messages will be printed out on whatever output 
device you specify in your LOG statement at IPL. (See the 
IBM System /3 Model 6 Operator's Guide, GC21 -7501 , for 
detailed discussion of the IPL procedure.) 



4. If the last file on a multifile reel is continued on a 
subsequent reel, the two reels constitute an aggregate. 
The restrictions in 1-3 apply to all volumes of the 
aggregate. In addition, all volumes of the aggregate 
must be either 7- or 9-track (7 track and 9-track reels 
may not be mixed in the same aggregate). 

5. Standard labeled 7-track tapes, if prepositioned, 
should be prepositioned to a point just before a 
HDR1 record. Otherwise, tape data checks or run- 
away may occur. 

Refer to the IBM System/3 Model 15 System Control Pro- 
gramming Reference Manual , GC2 1-5077 and System/3 
Control Programming Concepts and Reference Manual, 
GC21-5162, for discussions of tape multifile volumes. 



How to Supply OCL Statements for the Model 10 

You can supply OCL statements via the device you select 
as the system reader (the console keyboard, 1442, MFCU1, 
MFCU2, or 3741). For a discussion of selecting the system 
reader, see the IBM System/3 Model 10 Disk System Oper- 
ator's Guide, GC21-7508. 

To supply OCL statements from the diskette, refer to the 
IBM System/3 3741 Reference Manual. GC21 -51 1 3. 



16 



How to Supply OCL Statemenis for the Model 12 

You can supply OCL statements via the device you select 
as the system reader (the console keyboard, 1442, MFCU1, 
MFCU2, or 3471). For a discussion of selecting the system 
reader, see the IBM System/3 Model 12 Operator's Guide, 
GC21-5144. 

To supply OCL statements from the diskette, refer to the 
IBM System/3 3741 Reference Manual, GC21 -51 1 3. 



How to Supply OCL Statements for the Model 15 

You can supply OCL statements via the device you select 
as the system reader (1442, 2501, MFCU1 , MFCU2, con- 
sole, MFCM1,MFCM2, or 3741). For a discussion of selec- 
ting the system reader, see the IBM System/3 Model 15 
Operator's Guide, GC21-5075. 



TIMING CONSIDERATIONS 

The time it takes to sort a file depends on these factors: 

1. How much main storage you assign for the program's 
use. The larger the main storage allocation, the less 
time it takes to run a sort job. 

2. Number of records you want to sort. The greater 
the number of records, the longer it takes to sort 
them. 

3. Size of the records. The larger the records, the longer 
it takes to sort them. 



4. Number of sequence specifications in the sort program. 
The greater the number of sequence specifications, 
the longer it takes to run the sort job. 

5. Whether you are using an alternate collating sequence. 
An alternate collating sequence can increase the time 
it takes to run the sort job. 

6. Where the files are located on the disk. If the disk 
arm has to make many extra movements, the sort 
time will increase. This factor is especially significant 
for jobs with multivolume files. 

7. Order of the control fields in the input record. 

8. Whether or not automatic work file allocation is 
being used. 

9. Whether you are using the nonverify option. By using 
this option, data written on the work file will not be 
verified. The result is a decrease in the time it takes 
to sort a job. 

Each of these factors is discussed in detail in Appendix D 
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PROGRAMMING CONSIDERATIONS 





Addrout Sorts (SORTA) 


Tag Along Sorts (SORTR, SORTRS) 


Core Storage 

Requirements 


Less than tag along sort 


More than addrout sort 


Work File Size 


Need only be big enough 
to hold control fields and 
relative record numbers' 


Must be big enough to hold entire 
file 


Sorted Output 


Relative record numbers 
only 


Sorted output records can contain 
data only, control fields only, or 
both data and control fields 


Input File 


Input file should not be 
oveilaid by output file 


Input file can be overlaid by output 
file- (the input file can double as 
the output file) 


Job Time 


UsuiiMy shoi'ter 


Usually longer 


' This lets you sort large files without changing packs. 

2The space for the output file may be the same as that of the input file. In other words, 
the output file may overlay the input file. However, good programming practice is to 
never overlay a file you want to sort, unless you have first made a backup copy of the 
file. When using the input file as the output file, you must specify the same space 
(number of records or tracks), location, and label. 
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SPECIFICATIONS FOR TAG ALONG SORT (SORTR) 

The shaded columns are the ones you must consider for a 
tag along sort job. 



Type of sort 



Control field ami 
se(.|iienr;c inf oi riiation 



IBM 



\ / 



Page sequence 



:T" 



SEQUENCE SPECIFICATIONS 
Header 



\ 



p i.i: 



Format for sorted file 



L 



Record Type 



i 



Field- 



Field- 



-i^ 



Field- 



i--,-T-^ 



J ^J_i._L___.. 



■ Constant- 



Comparison of an input record field and a constant 



Comparison of two input record fields 



Field 



I 



Definition of normal control fields 
Definition of opposite control fields 
Definition of forced control fields 
Definition of data fields 
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SPECIFICATIONS FOR ADDROUT SORT (SORTA) 

The shaded columns are the ones you must consider for an 
addrout sort job. 



Type of sort 



Control field and 
sequence information 



IBM 



^=, 



Page sequence 



SEQUENCE SPECIFICATIONS 
Header 



I.] 



l Format tor sorted file 



I i I i 
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SPECIFICATIONS FOR SUMMARY SORT (SORTRS) 

The shaded columns are the ones you must consider for a 
summary sort job. 



Type of sort 



Control field and 
sequence information 



IBM 



f-T^ 



Page sequence 



T <^rrTp^ 



SEQUENCE SPECIFICATIONS 
Header 
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Field 



Definition of normal control fields 

Definition of opposite control fields 

Definition of forced control fieldi; 

Definition of data fields 
Definition of summary data fields 
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Chapter 3. Header Specifications 



Header specifications tell disk sort; 

• What type of sort you i/var.t 10 do i "j 
or summary tag alorig) 

• Hov".' you want to format (arrange) me sorten ' e 



• What, if any, system information you want printed (to 

did V'.>1J i'l til'-.'l '■">''iiCkt.P.gi 

Remember, use only one header line for each sort job. 



COLUMN SUMMARY 



Columns 
that must be 
filled in 



Columns that 
must be filled 
in for a tag 
along sort 
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Columns 


Entries 


1 ^ 

Explanation 


1-2 


00-99 


Page number 


3-5 


000 


Header line number 


6 


H 


Header hne ideniitication 


7-12 


SORTA 


Addrout .son ioD 


SORTH 


Tag along soiT lub 


SORTHS 


Summary iag along sort job 


13-17 


1-256 


Longest contfOi '.eia used in sorting the records 


18 


A 


Records in sorted file to be ir-. ascending order by control fields 


D 


Records in sorted file to tje in descending order by control fields 


19-25 


Blank 


Not used !n disk soi t |obs 


26 


Blank 
S 


Use standard Systern/3 collating sequence in compare operations 


Use an alternate Svsiem/S coilating sequence in compare operations 
ALTSEQ staiei ier:ii u>.'i,; deime ine collating sf^quence to be used 


27 


or blank 


Print: 

Sequence specification lines 
Diagnostic messages 
PrograiTi-staiui messages 
Action message; 


1 


Print: 

Program-status messages 
Action messages 


2 


Print action > messages ani^ 


3 


Print nothing 


28 


Blank 


Keep control t.eids in outpui lecords in tag along sort jobs 


X 


Drop control fields from output records in tag along sort jobs 


29-32 


1 -4096 


Length of output records in tag along sort jobs 


33 


Blank 


Not used .11 d.^>: son ioos 


34 


N 


Data written on the work file will not be verified 


35-36 


Blank 


Reserved f'" ^"'J'p'n u';p 


37-38 


12-48 Storage » ie t' ^jtr f^e obie t nioJule in m iit pies of 

■'l^ 'Mijce --i- ^ H 5lV 7 rind -/4a ATH) only) 


39 


BianR 
T 


'^^e VtC t J i ^^ \,y. T U af o -) 


'rdica t ''u K 1 J J o 4iJ~43 
M'^rtt'i 1 - 4 ^"vl"? II, 


D704b!V 


F- 1 -* t-ctt . J 1 < <, ^40 ^'1 ) K So, t only) 


40-43 


'-^-'■' iK-^' t, t^ ^. ,1 ' ~' us '^ fj ,A/iTh ' J "^ ^ 'r'adiDj zeros 
■^t^ Di,-, - ' 


40-72 


Any SysiriiT! 3 ch „^r"i.f- 


44-72 


Any Sy^'er, ? .■■, D riebcr pt t ' ~f > cf 5 t 


73-74 


Blank 


75-80 


Aiphdiiier t ch-;- -'i .; ; CCP,'Disk So:t OD;ec! piogrdni naine 



COLUMN DESCRIPTIONS 

Columns 1-2 (Page Number) and 3-5 (Line Number) 

Page number (columns 1-2) and line number (columns 3-5) 
form a 5-digit sequence number. As the program reads 
sequence specifications, it checks the sequence numbers to 
make sure they are not in descending order. If the numbers 
are in descending order (for example, if page 02 specifica- 
tions come before page 01 specifications) and specifications 
are being printed, the program will print a warning next to 
the line. After a warning is issued (the letter S) the program 
continues reading the rest of the specification lines and then 
halts and waits for further instructions from the operator. 
The operator can either continue or end the job. 



Columns 7-12 (Job) 

Columns 7-12 tell the program what type of sort job you 
want to do. SORTA means addrout sort. SO RTR means 
tag along sort. SORTRS means summary tag along sort. 



Because page number applies to all lines on a page, columns 
1 -2 appear only once, in the upper right corner of the page. 
You number the pages in ascending order. 

The line number of the header line is always 000 and is pre- 
printed on the coding sheet. 



Column 6 (Line Type) 

Column 6 of the header line contains a preprinted H to 
identify the line. 
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Columns 13-17 [Largest Sum (in Bytes) of Control Field 
Lengths for Any Record Type] 

To calculate this entry; 

1 . Add together the lengths of the control fields (N, O, 
or F in column 7 of field specifications) for each type 
of input record. 

2. Place the /argresf of these totals in columns 13-17. 
(Your entry must not exceed 256.) 

For more information, see Control Fields under Column 7, 
Field Description Specifications. 

The following specification sheet contains an example 
of the calculation for the entry in columns 13-17. 
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Column 18 (Ascending or Descending Sequence) 

Control fields control the sequence of records in the sorted 
output file. Your column 1 8 entry indicates the sequence 
in which you want the records sorted; 



Col. 18 Entry 


Sequence 


A 


Ascending sequence 
by controi field 


D 


Descending sequence 
by control field 



Column 26 (Collating Sequence) 

Column 26 specifies the collating sequence you want disk 
sort to use in compare operations. (Compare operations 
determine whether one character is equal to, greater than, 
or less than another character.) 



Standard Collating Sequence 

A blanl< in column 26 tells the system to use the standard 
System/3 collating sequence. There are slight variations in 
the standard collating sequence depending on whether you 
are using both the zone and digit portions of the characters 
in your records, the zone portions only, or the digit portions 
only. Appendix C shows the complete collating sequence 
for each situation. 



Alternate Collating Sequence 

An S in column 26 tells the program you want to ciiange 
the standard collating sequence. To do this you must 
supply ALTSEQ statements immediately following the 
header specifications (Appendix C tells you how to code 
ALTSEQ statements). 

Do not use a packed or unpacked factor 1 in an include or 
omit record type specification (P or U in column 8) if you 
specify an alternate collating sequence. 

Note: Generally, the only users of alternate collating 
sequences are European firms that want to insert special 
alphabetic characters (such as the German a, 6, and u and 
the Spanish n) into the standard System/3 collating sequence 
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Column 27 (Print Option) 

The disk sort program can print: 

• Sequence specification lines 

• Diagnostic messages, for any errors in sequence 
specifications 

• Program-status messages, to identify various stages of the 
job for you 

• Action messages (accompanied by a halt), to identify 
circumstances requiring attention before you can 
continue the job 

Column 27 indicates which of the preceding information 
you want the program to print during a job: 



Col. 27 Entry 


Program Prints 


or blank 


Sequence specifications 
Diagnostic messages 
Program-status messages 
Action messages 


1 


Program-status messages 
Action messages 


2 


Action messages only 


3 


None of above 



Column 28 (Output Option for Tag Along Sorts) 

Column 28 applies to tag along sort (SORTR or SORTRS) 
jobs only. It indicates whether or not you want the program 
to drop control fields from output records after the records 
are sorted. A blank in column 28 means keep tne control 
fields; X means drop tnem. 



Considerations for Dropping Control Fields 

Control fields are normally dropped if you are using 
opposite control fields or an alternate collating sequence. 
In these two cases, the program changes the control infor- 
mation (during the sorting process) in such a way that it will 
be meaningless to you. 



Using Fields as Both Control and Data Fields 

If you are using opposite control fields or an alternate 
collating sequence and you want to keep the control infor- 
mation in a meaningful form in the output records, describe 
the fields twice: once as control fields and once as data 
fields. Data fields are not involved in the sorting process 
and are not changed by the program. 
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Columns 29-32 (Output Record Length for Tag Along Sorts) 

Columns 29-32 apply to tag along sort (SORTR or SORTRS) 
jobs only,. The entry in these columns tells the program the 
length of records in the final sorted file. 

If you do not drop control fields, the length includes both 
control and data fields. If you drop control fields, the 
length includes only data fields. In either case, the sum of 
the control fields and the data fields must not exceed the 
maximum work record length limits listed in Appendix E. 

Calculating Output Record Length When Dropping Control 
Fields 

For each type of record, total the lengths of all the data 
fields you are including in the job. Select the largest total 
and enter this number in columns 29-32. 

Calculating Output Record Length When Not Dropping 
Control Fields 

For each type of record, total the lengths of the data 
fields. Select the largest total, add this total to the number 
in columns 13-17, and put the sum in columns 29-32. (The 
sum must not exceed the maximum work record length 
limits listed in Appendix E.) 



Column 34 INonverify Option) 

Column 34 applies to all disk sort runs except those that 
contain a work file statement for a 3340 disk file on Model 
15 only. When a 3340 file (D1 . D2, D3, D4) on Model 15 
only is used as the work file, the verify option is taken from 
the OCL Fl LE statement and column 34 of the sort 
header record is ignored. Otherwise, if an N is placed in this 
column of the disk sort header statement, none of the data 
written on the work file will be verified. This results in an 
improvement in performance (see Appendix D. Tuning 
Considerations) . 

Note: If you use the nonverify option when youi output 
file is to overlay the input file, the input file might be 
destroyed if a terminal error occurs before end of job. There- 
fore, if the input file cannot be easily recreated, you should 
have a duplicate copy for backup. The input file can be 
destroyed under the same circumstances whether the non- 
verify option is used or not. However, the chance is greater 
when using the nonverify option. 
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Columns 37-38 (Storage Size) - Modei 15 CCP.'Orsk Sost 
5704-SM7 and 5799-ATH 



Page of SC2 1-7522 
Issued 29 September 1978 
ByTNL: SN21-5651 

Columns ?5 80 (Program Identification/Program Name) 



You designate the required storage '.l'p i,- iiuiTinieN ot 2K 
from 12 to 48 for execution of the obiect rnodu!p, Th.- 
default is 12. 



For disk ',ort the program identification is only used for 
user reference It has no program function. 



Column 39 (Record Length Indicator) - CCP/Disk Sort 
Only 

Aiode/s4,8, 10, 12, ISA. IBB.and 15C 

R This code indlCd'f'5 itldT :-l re;:'.;r-i i."vi;. -v * ' 

colurnns 40-4-:^ 



Mode! 15 with Proqra'n Number 5704-SM/ Only 

C Indicates task chain and that a recorn ienqrh exisrs 
in columns 40-43. 

T Indicates Release and Task Chain operation A 
record length exists in columns 40-43. For a dii 
cussion of the CCP Release and Task Chain opei^atian 
program, see IBM System/3 Communications Controi 
Programmer's Reference Manual, GC21 7579 

R Indicates that a record length exists in columns 40 43. 



CCP/P's/c Sort 

Foi C'';r i:;;,k Sir t, the program name does provide a pro- 
grarr tj:' ton This f^eid contains the name given to the 
rbiecr proorarn. This is the name that you enter from the 
tei^r; -di ro ,r)voke the sort. The entry can be: 

1 A .a?i.: pi oqrarn name. The first character must be 

aii hsr».tic hut cannot be a #. S. or @ character. 
T".- :, rr-iaininq characters must be alphameric with 
n,) jmbednHd blanks or special characters. 

2. Bisr.-- The defaijit is SRTOBJ. 

Note: D-^ '"^LL. and SYSTEM are reserved names and 

must io: iw used as program names. 



Columns 40-43 (Record Length) - CCP/Disk Sort Only 

You designate the input file record length, right justified, 
with or without leading zeros. 

Note: If a user comment currently exists, you must fit ii 
into columns 44-72, or remove it 



Columns 40-72 (Job Description) or Columns 44-72 (Job 
Description - CCP/Disk Sort Only) 

This field is for your comments. You can use any System/3 
characters you want in these columns. It the program 
prints specification lines (the column 27 entry is a zero 
or blank), the comments you include in these columns 
are printed. Comments have no effect on the program. 



::r,F.' ' i.a--r,r^'. 



Chapter 4. Record Type Specifications 



Record type specifications tell disk sort which of the 
records In a file you want to sort. Remember, if you want 
to sort all the records in a file, and they all have the same 
format, you do not have to fill out record type specifications. 



COLUMN SUMMARY 



Columns that must 
be filled in 



Columns 


Entries 


Explanation 


1-2 


00-99 


Page number 


3-5 


01x-06x 


Line number (you can leave column 5 blank, or enter any 
value to keep the specifications in ascending order) 


6 


1 


Include line 





Omit line 


7 


A 


And line (these specifications continue the definition of the 
record described on the previous line) 





Or line (these specifications define a different type of record 
than the one on the previous line) 


Blank 


First line of a set of 1 or record type lines 


* 


Comment line 


8 


C 


Use both zone and digit portions of characters 


z 


Use only zone portion of 1 -character field 


D 


Use only digit portion of characters 


P 


Signed packed decimal data 


U 


Signed unpacked decimal data 


9-12 


1^096 


The input record position in which the factor 1 field begins 
(blank if field is only one position long) 


13-16 


1-4096 


The input record position in which the factor 1 field ends 


17-18 
19 


EQ 
NE 
LT 
GT 

le' 

GE 


Factor 1 must equal factor 2 

Factor 1 must not equal factor 2 

Factor 1 must be less than factor 2 

Factor 1 must be greater than factor 2 

Factor 1 must be less than or equal to factor 2 

Factor 1 must be greater than or equal to factor 2 


C 


Factor 2 is a constant 


F 


Factor 2 is another field in the same input record 


20-23 


1^096 


The input record position in which the factor 2 field begins 
(blank if field is only one position long) 


24-27 


1 -4096 


The input record position in which the factor 2 field ends 


20-39 


Any System/S 
characters 


The factor 2 constant 


40-72 


Any Systenn/S 
characters 


Comments 



COLUMN DESCRIPTIONS 



Column 6 (Line Type) 



Columns 1-2 (Page Number) and 3-5 (Line Number) 

Page number (columns 1-2) and line number (columns 3-5) 
form a 5-digit sequence number. As the program reads 
sequence specifications, it checks the sequence numbers to 
make sure they are not in descending order. If the numbers 
are in descending order (for example, if page 02 specifica- 
tions come before page 01 specifications) and specifications 
are being printed, the program will print a warning (the letter 
S) next to the line (the S stands for sequence error). After a 
warning is issued, the program continues reading the rest of 
the specification lines, then halts and waits for further in- 
structions from the operator. The operator can either con- 
tinue or end the job. 

Because page number applies to all lines on a page, columns 
1-2 appear only once, in the upper right corner of the page. 
Number the pages in ascending order. 

Record type line numbers are 01 through 06. The numbers 
in columns 3 and 4 are preprinted on the coding sheet. You 
can leave column 5 blank or enter any value to keep your 
specifications in ascending order. If you have more than 
six record type lines, use another coding sheet and start at 
line 01. 



Out-of-Sequence Lines 

Use column 5 when you want to insert a specification with- 
out renumbering the other specifications. For example, to 
insert a specification line between lines 01010 and 01020, 
you can number it 01015, code it, and then continue to fill 
out the rest of the sheet. 

Be sure any lines that are out of sequence on your coding 
sheet are clearly marked. You can do this by writing a note 
in the margin of the page with an arrow pointing to where 
the insert belongs (see Sample Job 3). 



Column 6 identifies the type of record type line. An I in 
this column stands for either an include or an include-all 
line; an stands for an omit line. 



Include Line 

Include lines Identify records you want the program to sort 
by describing particular record fields. 



Include- All Line 

Include-all is a special form of include line; it has no record 
description (columns 7 39 are blank). It tells the program 
to sort all the recoicls that have not been described by any 
preceding inci'de oi omit line for the job. Records referred 
to in this manner must have the same field specifications. 

Note: Only one include-all line can be used per job. If 
used, it must be the last record type line for that job. 



Summary: Include Lines 

If the type of sort job you are running requires you to code 
record type lines, you must use include or include-all lines 
to describe the lecords you want sorted. Records not 
described in include lines will not be sorted. 



Omit Line 

Omit lines identify records you do not want the program 
to sort. Omit lines are not required but can be helpful 
when you have many types of records you want the pro- 
gram to use and just a few you want omitted. Omit lines 
are normally followed by an include-all line, telling the pro- 
gram to sort all the records that are not described by omit 
lines. 
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Sets 



There are two types of sets: include sets and omit sets. An 
include set identifies one or more record types you want to 
include in your sort job. An omit set identifies one or more 
record types you want to omit from your sort job. (The 
records in any record type always have at least one charac- 
teristic in common — such as an X in position 5.) 



INCLUDE SETS' 



Here are four rules to remember when you are using 
include and omit sets: 

1 . All include sets must end with a field description line. 

2. Omit sets never have field description lines. 

3. Every omit set must be followed by an include set. 

4. The last set must be an include set. 

There are five types of include sets and three types of omit 
sets. 



Type 


Col. 6 


Col. 7 


Explanation 


Include 
AND lines 


H, F,or 

1 
1 

F 


A 


Header line, field description line, or omit line 

Record type lines: 

New record type indicated by blank in column 7. 

Lines that describe the same record type (as the previous line) have an 
A in column 7. 

Field description line(s) 


Include 
OR lines 


H, F, or 

1 
1 

F 





Header line, field description line, or omit line 

Record type lines: 

New record type indicated by blank in column 7. 

Lines that describe different record types (than the previous line) have 
an O in column 7. 

Field description line(s) 


Include 
AND and 
OR lines 


H, F, or 

1 
1 

1 
F 



A 


Header line, field description line, or omit line 

Record type lines: 

New record type indicated by blank in column 7. 

This line designates a record type which is different than but has the 
same field description lines as the record type described in the previous 
line(s). 

This line continues the same record type of a previous line or lines. This 
record type can be continued (lA), or another record type can be 
started (lO), provided all record types have the same field description 
lines. Record types with different field lines would have to start a new 
include set. 

Field description line(s) for either A or O record types 


Include 
only one 
record 
type 
(implied 
include- 
all) 


H 
F 




Header line 

No record type lines 

Field description line(s) 


Include- 
all 


H, F,or 

1 

F 




Header line, field description line, or omit line 

Record type line: Tells program to sort all the records that have not been 
described by any preceding include and omit lines. Records referred to in 
this manner must have identical field specifications. 

Field description line(s) 


1 Every include set must end with f^eld description lines. An include set can be followed by another include set, an 
omit set, or // END. 

Note: Records not described in include sets will not be sorted. 
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OMIT sets' 



Type 


Col. 6 


Col. 7 


Explanation 




H or F 




Header line or field description line (last line of include set) 


Omit AND lines 





\b 


New record type indicated by blank in ^ 


(one record type) 






column 7. / Record 







A 


Lines that describe the same record type / Type 
(as the previous line) have an A in V Lines 
column 7. / 




H or F 




Header line or field description line (last line of include set) 


Omit OR lines 





\t> 


New record type indicated by blank in \ 


(different record types) 






column 7. / Record 







O 


Lines that describe different record > Type 
types (than the previous line) have V Lines 
an O m column 7. J 




H or F 




Header line or field description line (last line of include set) 




O 


\t> 


New record type indicated by blank in 
column 7. 


Omit AND and OR lines 





A 


Lines that describe the same record type 


(different record types) 






(as the previous line) have an A in 
column 7. 




O 


O 


Lines that describe different record types 
(than the previous lines) have an in 
column 7. 


1 There are no field descrip 


tion lines in 


omit sets. 


Each omit set must be followed by an include or an include-all set. 



Guide to Using include and Omit Sets 

Wiien to Use Include Sets: If you want to sort only a few 
records in a file, use an include set for each type of record 
you want to sort. 



When to Use Omit Sets: If you want to sort all but a few 
records in a file, use omit sets followed by either an include 
set for each type of record you want to sort or an include- 
all set. 



Mixing Include and Omit Sets: You can mix include and 
omit sets; but because disk sort processes the sets in the 
order they are coded, you must be particularly careful when 
you do this. For example, if you wanted to omit all records 
with a 2 in position 10 but sort those with a 2 in positions 
10 and 15, you would have to specify the include set before 
the omit set. If you specified the omit set first, all the 
records you want sorted would be omitted from the job. 
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Column 7 (Continuation or Comments) 

Column 7 Indicates the line's relationship to the preceding 



Col. 7 Entry 



Blank 



Explanation 



This line is the first of n set of include 
or omit lines. (The type of set is indi- 
cated by the column 6 entry: I for 
include O for omit.) 



The line is d continuation of the pre- 
ceding line. The A storids for AND. 



The Ime applies to a different record 
type than the preceding line, but the 
control field specifications for both 
are the same. The O stands for OR. 



This line IS a comment line. Comment 
lines do not affect the program in any 
way. Their only purpose is to help you 
remember what you were doing in a 
certain section of coding. (Comments 
are printed only if colurrm '21 ot the 
header line contains a zero or a blank ! 



Column 8 (C/Z/D/P/U) 

Your column 8 entry tells disk sort how to interpret data In 
the factor 1 and factor 2 fields during compare operations. 
When the fields contain alphameric data, a C, Z, or D entry 
tells disk sort what portions of the characters to use. When 
the fields contain signed numeric data, a P or U entry tells 
disk sort whether the data is packed or unpacked. 



Alphameric 
data 



Signed ( 

numeric .' 

data ) 



Col. 8 Entry 


Compare Operations 


Maximum 
Field Length! 


C 


Use both zone and digit 
portions of the characters 


256 characteis 


Z 


Use only the .'one portion 
of the chaiactei 


1 character 


D 


Use only the digit portion 
of the chdracteis 


1 6 characiei s 


P2 


Numeric cJata is packed 


8 liyles or 16 digits 


U" 


Numeric data is unpacked 


16 digits 


' For both factor 1 and faciei 2 fields 

^Do not use a packed oi unpacked factor 1 in an include or omit record 

type specification (P oi U in column 8) if you specify an alternate 

collating sequence (S in column 26 of header line). 
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Significance of the Column 8 Entry 

You use record type specifications to tell the disk sort pro- 
gram which records you want to sort. You do this by in- 
structing disk sort to test each record by comparing the 
data in a specific field against a constant or against the 
data in another field in the same record. The data you are 
comparing is the factor 1 field; the data you are comparing 
it against (a constant or the contents of another field in the 
same record) is the factor 2 field. The result of the com- 
parisons determines whether or not that record will be 
sorted. Since the disk sort program sees your data as noth- 
ing more tlian a series of electronic bits, you must tell the 
program: how to interpret the data: 

• If the data is alphameric, what part of the characters to 
use 

• If the data is signed numeric, whether it is in packed or 
unpacked format 



If you instruct disk sort to use only the digit portions of 
characters (by putting a D in column 8), characters with 
identical digit portions will look alike and compare as equal. 
Likewise, if you instruct disk sort to use only the zone 
portion of characters (by putting a Z in column 8) charac- 
ters with identical zone portions will look alike and com- 
pare as equal. Thus your column 8 entry is critical in ensur- 
ing that your compare operations produce the results you 
intend. 

Suppose, for example, that you want only those records 
witli a 2 in column 15 and a 2 in column 50. If you put 
a D in column 8, you will get the records you want: the 
ones with a 2 in column 1 5 and a 2 in column 50. But you 
will also get a lot of records you do not want (several char- 
acters have the same digit portion as a 2). To get on/y the 
records with a 2 in column 1 5 and a 2 in column 50 you 
would have to put a C in column 8. The C tells disk sort 
to use both the zone and digit portions of characters in its 
compare operations, and no other System/3 character has 
the same zone and digit portion as a 2. 



Interpreting System /3 Data 

Each Svstem/3 EBCDIC character has two parts: a zone 
portion and a digit portion. Some characters have identical 
zone portions; some have identical digit portions. No two 
characters have identical zone and digit portions. 





How It Looks inside the Computer | 


System/3 Character 












Zone Portion 


Digit Portion 


♦ 


0101 


1100 


1 


1111 


0001 


2 


1111 


0010 


3 


1111 


0011 


K 


1101 


0010 


? 


0110 


1111 


P 


1101 


0111 


blank 


0100 


0000' 





1111 


0000' 


' Notice that the digit 


portion o1 a zertj 


tind blank look 


excctly the satne. 







f\Jote: The leftmost bit of each byte of ASCII data that is 
not converted to EBCDIC is set to zeros. 



Alphameric Data 

When the factor 1 and factor 2 fields contain alphameric 
data, the column 8 entry must specify one of the following: 

• The zone and digit portions of the characters (C entry) 

• Only the zone portion of the character (Z entry) 

• Only the digit portion of the character (D entry) 
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Numeric Data 

When the factor 1 and factor 2 fields contain numeric data, 
the column 8 entry must answer two questions: 

1 . Are the numbers signed or unsigned? 

2. Are the numbers packed or unpacked? 



Format of 


Col. 8 






Numeric Data 


Entry 


Definition 


Considerations' 


Unsigned 


D 


Number does 


Absolute values of the numbers are 






not have a sign. 


used. If a number has a sign, it is 
ignored. For example, -3 would be 








considered equal to +3. 




Pacl<ed 


P 


Number always 
carries a sign. 
When the number 
is placed in core 
storage it has a 


The sign controls the comparison. 
For example, -3 is less than and 
+5 IS more than -6. 


Signed 






digit portion only. 




Unpacl<ed 


U 


Number always 


The sign controls the comparison. 








carries a sign. 
When the number 


For example, ~3 is less than and 
+5 is more than -6. 








is placed in core 










storage, it has 
both a zone and 










digit portion 




' Before comparing nu 


Tieric data, disk sort converts ar 


y leading blanks to zeros. 



Signed Numbers: Signed numbers can be either positive or 
negative. The sign of a number is indicated by a 4-bit binary 
code. 



Paci<ed and Unpacl<ed Numbers: An unpacked digit takes 
up eight bits; a packed digit takes up four bits. 



Sign 


Binary Code 


+ 


1111 ' 
1010 
1100 
1110 




1101 
1011 


Standard form. Disk sort accepts 
all four forms of the plus sign. Be- 
fore sorting the file, however, the 
program converts all plus signs to 
the standard form. If you print a 
core dump, the plus sign will al- 
ways be expressed as a hex F. 



Packed Digits 




Unpacked Digits 


Digit 


Binary Form 


Digit 


Binary Form 





0000 







0000 


1 


0001 




1 




0001 


2 


0010 




2 




0010 


3 


0011 




3 




0011 


4 


0100 




4 




0100 


5 


0101 




5 




0101 


6 


0110 




6 




0110 


7 


0111 




7 




0111 


8 


1000 




8 




1000 


9 


1001 




9 




1001 


^ 




— — 




Digit Portion Only 






Zone 
Portion 


Digit 
Portion 
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In unpacked numbers, the 4-bit sign code replaces the zone 
portion of the last digit in the number. In packed numbers 
the sign code takes up the last four bits of the number. 



Unpacked 



Packed 



Positive 



Negative 



Positive 



Negative 



+2049 




2 4 9 

|i,i,i, ii^,i,o| i,i,i,i|oXopii, i,i,i|0?r5| }i,i.i .l^£AI 

Zone Digit Zone Digit Zone Diglll Zone fSligit 



Positive zone 



-2049 




2^ 0^^ 4|ir ""''«; 9 

|i|i|i ,iiO,oXo|i,i ,i, i|OAO,o |i ,i,i,i|0 ,i'^i,i,o,iij|?,o,i| 

Zone Digit Zone Digit Zone Digllll Zone l^igit 



Negative zone 



f2049 





2' 4 9 Jlllllllllll 

|oj)j3^1o 1^ o]oo |o 2 o |i qjlii 1 1 1 1 ''': 

Digit I Digit Digit Digit Digi|||, Sign ( + ) 



-2049 , 




2 4 9|iiiWi**iiiii| 

I 0|0 1 | 0|0 1 0|1 Jl 1 1 I 1 
Digit Digit Digit Digit Dig||;| Sign (-) 
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Columns 9-16 (Factor 1 Location) 



Coding Rules 



Factor i luMd- idrntily your records. (If all your inventory 
records conLjin an I i i ooh.imn 2, for example, column 2 
is a fai;toi 1 lieki) Disk sort identifies records you want 
sorted tiv oii.pariiuj factor 1 fields against constants or 
against otfiei lolds iti rie same record. Columns 9-16 identi- 
fy tfie loca: ij^'s ot rhe factoi 1 fields in tne records. If there 
is more ttKi! '>> tido' I field for t.he records you are 
describing, 'v'.,'!i rvK si 

• Describe each field in a separate record type line. 

• Put an A ri column 7 of every line (except the first) to 
tell disk soil that aii the lines apply to the same record 
type. 

Columns 9-l.'^ (from) identify where the factor 1 field be- 
gins in the locord. Columns 13-16 (to) identify where the 
field ends. 



Length of >'-jctnr : Fields 

A factor 1 field can contain anywhere from 1 to 256 char- 
acters. No factor 1 field, however, can be longer than the 
length of tne records you are working with. (For example, 
when you ar;- working with 96-column records, the longest 
possible facto; 1 field you can have is a 96-character field.) 
The length of tactor 1 iieids is also controlled by the col- 
umn 8 entry 



Co). 8 


Mdximum Factor 1 


Fin try 


Field Length 


!": 


?5G ci'iarricrei s' 


7 


i ciint.'uler 


i; 


1 () ( h;!i.K:Te'S 


F- 


S (■.!■.. i;k tei S-' 


1 , 


■! (; chrir actei s 


' v'V'! leil 


.:ictur 2 is j conslunt, the length ot 


■ •ip ';k 


ti)i 1 heiri nius! noi exceed 20 


■ ! . i '1 rr 


^[ - .;^ee Coiiimns 20-39 for mote 


i.;,-, ,nl 


'i'e :.i(,.t()i 1 I'leid IS packed, the 


iuMs 


n ■(■■■. .I'ly lufjresoni 16 decimul 
ru; , sign. 



Entries must be right-justified; the from entry musl end .;i 
column 12; the to entry must end in column in. 

To describe factor 1 fields that are only one characier 
long, leave columns 9-12 (from) blank and enter the nuitii)er 
of the record position that contains the charactei ,ii i;ol 
umns 13-16 (to). 

For example, here is the entry you would make to descnlje 
the position of a factor 1 field which consists of an i m 
column 2. 



: . 


,j 










■ .'^■■■'i^a-- 




'■■'y}'y!^yiWy.y.'- 


y-iyisy-:--/--'';- 


i 


■ 'iy-V:: 1 


:■# 


t 




r^ 




, ,?^'?crj. 


; 

i 
1 



Rect)rd Type 



Columns 17-18 (Relation) 

The program identifies records you want to soit i;)y compai 
ingthe factor 1 field (columns 9-16) against either a constant 
(columns 20-39) or another field (columns 20-2/) in t'ls 
same record. The constant or other field is called facioi ? 
Columns 17-18 tell the program what tlie results of tie 
comparison must be. (If alternate collating sequeiice ib used, 
both factor 1 and factor 2 are modified before tfie compan 
son is made.) 



Col. 17-18 
Entry 


Meaning 






EQI 


Factor 1 must equal factor 2. 


NE' 


Factor 1 must not equal factoi 2. 


LT 


Factor 1 must be less than factor ?. 


GT 


Factor 1 must be greater than factor 2, j 


LE 


Factor 1 must be less than or e()ual to factor ;' 


GE 


Factor 1 must be greater than or e(!uai t^> factor 2 


' If you want the program ro compan? zcnt; r>uttif)ns iil 
characters (Z in column 8), EQ and NE are the only 
entries you can use. 
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Column 19 (Field or Constant) 

The program identifies records you want to sort by com- 
paring the factor 1 field (columns 9-16) with a constant, or 
another field in the same record. The constant or other 
field is called factor 2. Column 19 tells the program whether 
factor 2 is a constant or another field. C in column 19 
means factor 2 is a constant; F means factor 2 is a field. 



Record Type 



^ 1 

F„„., T„ I 
V .•'• .■! ■■' •'■ ■■' >•■ ' .■■! - _^ ■ ■■[■■■'■■ 



When you put a C in column 19, you use columns 20-39 
for the constant. When you put an F in column 19, you 
use columns 20-27 to identify the location of the factor 2 
field in the records. 

Note: The K shown in column 19 on the sequence 
specification sheet is not used for System/3 disk sort. 



Columns 20-27 (Factor 2 Field) 

The factor 2 field must be the same length as the factor 1 
field. It also must be in the same record as the factor 1 field. 

Columns 20-27 are used to record the location of the factor 
2 field. Columns 20-23 (from) identify the starting position 
of the field; columns 24-27 (to) identify where the field ends. 

Note: The keyword parameter shown for columns 20-25 
on the sequence specification sheet is not used for System/3 
disk sort. 



Coding Rules 

Entries must be right-justified: the from entry must end in 
column 23; the to entry must end in column 27. 

To describe fields that are only one character long, leave 
columns 20-23 (from) blani;, and enter the number of tiie 
record position that contains the character in columns 24-27 
(to). 

Columns 20-39 (Factor 2 Constant) 

When factor 2 is a constant, you use columns 20-39 to write 
in the constant you want to use. The constant can be any 
arrangement of System/3 characters. 

The constant must be the same length as the factor 1 field. 
For example, if you have a 4-position factor 1 field, your 
constant field must take up four positions. If your constant 
is the number 6, you would put the 6 m column 23, and 
either leave columns 20, 21 , and 22 blank or fill them with 
zeros. 



Record Type 



If the factor 1 field contains a packed number, the length 
of the constant (including the sign) must be twice tlie 
length of the factor 1 field. The reason for this is that fac- 
tor 1 data is in packed form, and the constant you are writ- 
ing in is in unpacked form. 



Alphameric Constants (Column 8 Entry is C, Z, oi 0/ 

The constant must be the same length as the factor 1 field 
and must always begin in column 20. 



Numeric Constants (Column 8 Entry is P, U, or D) 

Format: Numeric constants must be right-justified within 
the field length specified in factor 1 (within twice the field 
length if factor 1 is a packed number). For example, assriine 
that factor 1 defines a 6-position field in the input record, 
and that factor 2 is tne numeric constant 1 23 To right 
justify the constant within six positions, you would have 
to put the constant in columns 23, 24, and 25. Leading 
zeros are not required. To disk sort, blanks and zeros look 
the same. In the example above, columns 20-25 could 
contain either 0001 23 or bbbi 23 (with b representing a 
blank). 

Signed Constants: If factor 1 is a packed numbei . the last 
character in the constant must be its sign (-t or - ). If factor 
1 is an unpacked number and the constant is a negative 
number, the last digit in the constant must be a character 
that indicates both the numeric value of the last digit and 
the negative sign for the entire constant. 
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Coding Negative Unpacked Constants 






How the Number Lool<s inside 


if Last Digit 
in Constant is 


Character that 
You Code 


the Computer 


Zone Portion' 


Digit Portion- 





- (minus code)-' 


0110 


0000 


1 


J 


1101 


0001 


2 


K 


1101 


0010 


3 


L 


1101 


0011 


4 


M 


1101 


0100 


5 


N 


1101 


0101 


6 





1101 


0110 


7 


P 


1101 


01 11 


8 


Q 


1101 


1000 


9 


R 


1101 


1001 


'The zone portion indicates the negativ 


3 sign of the entire number. 


-The digit portion indicates the numeric 


value of the last digit in the 


number. 









•*lf your system input device is a system card device, you can punch 
a zero and minus in the same card column. 



For example, here is the entry you would make to sort 
records which have a packed negative 1 (-1) In positions 
1 and 2, an unpacked negative 24 (-24) in positions 5-8, 
and an unpacked negative 10 (-10) in positions 1 116: 



i- 



lOU 



i 

5 
11 






i 



f^ecord Type 



PAcKfip - 

lANp/jcitieo' 



-Iff 



Columns 40-72 (Comments) 

Columns 40-72 are for your comments. If you have instruc- 
ted disk sort to print sequence specifications (column 27 
of the header line is either blank or contains a zero) the 
comments will be printed along with your sequence specifi 
cations. The comments have no effect on the program's 
operation. 

Many programmers like to use columns 40-47 to write the 
names of the records described in the record type specifica- 
tions. This is why columns 40-47 are enclosed in dotted 
lines on the coding sheet. 
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Chapter 5. Field Description Specifications 



Field description specifications tell disk sort how to arrange 
(format) records in the output file. 



COLUMN SUMMARY 



Columns that must 
be filled in for all 
sort jobs 



Columns that must be 
filled in when forced 
control fields are used 



Columns 


Contents 


Explanation 


1-2 


00-99 


Page number 


3-5 


07x-14x 


Line number (you can leave column 5 blank, or 
enter any value to keep the specifications in 
ascending order). 


6 


F 


Field specification line 


7 


N 


Normal control field 


O 


Opposite control field 


F 


Forced control field 


D 


Data field 


S 


Summary data field 


* 


Comment line 


8 


P 


Signed packed decimal data 


U 


Signed unpacked decimal data 


c 


Use both zone and digit portions of characters in the 
field 


z 


Use only zone portion of 1 -character field 


D 


Use only digit portion of characters in the field 


V 


Force a data character into the data field 


9-12 


1^096 


Starting position of field in the record (blank if field 
is one character long) 


13-16 


1-4096 


End position of field in the record 


17 


Any System/3 
character 


Forced control fields only (the character you want 
the program to change) 


18 


Any System/3 
character 


Forced control fields only (the character you want 
to substitute) 


19 


Blank 


Forced control field line is not a continuation of the 
preceding line 


Any character 
other than 
blank 


Forced control field line is a continuation of the pre- 
ceding line 


20-22 


1-16 


Summary tag along sort only (overflow field length entry) 


23-39 


Not used 


Not used 


40-72 


Any System/3 
characters 


Comments 
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COLUMN DESCRIPTION 



Column 7 (Field Type or Comments) 



Columns 12 (Page Number) and 3-5 (Line Number) 

Page number (columns 1-2) and line number (columns 3-5) 
form a 5-digit sequence number. As the program reads 
sequence specifications, it checks the sequence numbers to 
make sure they are not in descending order. If the numbers 
are in descending order (for example, if page 02 specifications 
come befoie page 01 specifications) and specifications are 
being printed, the program will print a warning next to the 
line. After a warning is issued (the letter S), the program 
reads the rest of the specification lines and then halts and 
waits tor further instructions from the operator. The oper- 
ator can either continue or end the job. 

Because page number applies to all lines on the page, col- 
umns 12 apfjear only once, in the upper right corner of 
the page. Number the pages in ascending order. 

Here is the recommended procedure for field description 
linenumbeis. Field line numbers are 07 through 14. The 
numbers in columns 3 and 4 are preprinted on the coding 
sheet. You can leave column 5 blank, or enter any value 
to keep your specifications in ascending order. If you have 
more than eight field lines, use another coding sheet and 
start at iuie 07 



Use column 5 when you want to insert a specification line 
without renumbering the other lines. For example, to in- 
sert d specification line between lines 01070 and 01080, 
you can number it 01075, code it, and then continue to fill 

out the rest of the sheet. 



Your column 7 entry tells disk sort whether you are describ- 
ing a control field, data field, or comment line. If you are 
describing a control field, the column 7 entry indicates how 
the field is to be used. See Columns 7-8 to find the ways 
you can combine this entry with the column 8 entry. 



Col. 7 Entry 


Tells Program 


D 


This is a data field ' 


• 


This IS a comment line. 


N 


This IS a normal control field. Sort this field 
so that the data from the field is in the se- 
quence specified in column 18 of the header 
line. 


O 


This is an opposite control field. Sort this 
field so that the data from the field is in the 
sequence opposite that specified in column 18 
of the header line. 


F 


This is a forced control field. Change the con- 
trol field according to the entries in columns 
9-19. 


S 


Tins IS a summary data field- 


1 Use this entry (or tag along (SORTR, SORTRS) sorts 
only. (If you use a D entry durincj an addrout sort, the 
line Will be treated like a comment line.) 

-Use this entry for summary i,iq along (SOF-^TRS) only. 
(If you use an S entry during an addrout sort, the line 
will be treated like a comment line. If you use an S 
entry during a tag along sort, the fields will be 
treated as normal data f.olds). 



Be sure ar-y hues that are out of sequence are clearly marked. 
You can do this by writing a note in the margin of the page 
with an arrow pointing to where the insert belongs (see 
Sanyj/e Job 3). 



Column 6 fLine Type) 

CoiuiiHi 6 contains a preprinted F, identifying the line as a 
field line For addrout sorts (SORTA), field lines describe 
control fields the program uses to sort record addresses. 
For tag along sorts (SORTR) and summary tag along sorts 
(SORTRS), field lines describe the fields that the program 
uses to create the records in the sorted output file. The 
fields can be either control fields (used to sort the records) 
or actu.jl data fields. In addition, for summary tag along 
sorts, field lines describe the fields that tne program sum- 
marizes (aads together). 



Data Fields (D in Column 7) 

Data fields apply to tag along (SORTR, SORTRS) sort 
jobs only. They are fields you want the program to include 
in the sorted records, but which you do not want the pro- 
gram to use in sorting the records. Within each include set 
(include and field description lines), control field lines 
must be placed before data field linos. 

When your file has more than one type of record: 

• The number of data fields does not have to be the same 
for all record types. 

• The total lengths of all the data fields do not have to be 
tiie same for all record types. Disk sort places blanks to 
the right of shorter data fields so that all total lengths 
are equal. 
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Comment Lines (* in Column 7) 

Comment iines help document the program. They do not 
affect the program's operation. You can code comment 
lines anywhere in the sequence specifications; however, 
comments will be printed only if column 27 of the header 
line contains a zero or blank. 



A conditional force occurs only if a control field in the in- 
put record contains a particular entry. Suppose, for ex- 
ample, that you want to sort a file of records, each of which 
has a 1 -position control field. If the character in the control 
field is an X, you want to replace it with an A before you 
sort the records. To do this, you woLild use a conditional 
force. Your conditional force field would tell disk sort: 



Control Fields (N, O, or F in Column 7) 

There is no limit to the number of control fields allowed, 
however the total length of all the control fields must be 
fiom 1 to 256 bytes long. 

When youi file has more than one type of record: 

• The number of control fields does not have to be the 
same for all record types. 

• The total lengths of the control fields do not have to be 
the same for all record types. 



Build a work record from the input record: 



1— 1 -position rontroi fi(;l(i 



;'ld portion 



i , 



L.;..ii J \j'y. uon 



Data 



-Data- 



I 



C , " U,ua- 



Input record 



Work I pcoi d 



!*osii !o(i H'Dtioi field 



When records with duplicate control fields (records with all 
control fields equal) are sorted, their order as output is 
unpredictable. 

Normal and Opposite Control Fields (N or O in Column 7j: 
These control fields are fields the program uses to sort 
records or record addresses. They are fields in your input 
records. However, you can define 1 -character control fields 
that are not in the records by using an unconditional force. 
(See Forced Control Fields. ) 



Forced Control Fields (F in Column 7): There are three 

types oi forced control fields: 

• Conditional 

• Force all 

• Unconditional 

Forced control fields affect the work and output records 
onl /. (It is important to remember that disk sort never 
changes your input records.) 

See Column 17, Column 18 and Column 19 for information 
on how to fill out the field description specifications when 
you arf! using forced control fields. 



If the control field contains an X, chari'je it to an A: 



-Data- 



A ^^ DatP- 

I 



Original work record 



' New ivot k record 



Force-all is a special type of conditioti.i. '■M.t,. Porce-all 
occurs only when a control field in an .uijoi rccoiU does not 
contain a particular entry. Suppose, foi uxcimpio, Liiat you 
want to sort a file of records, each of whicii has a 1 -position 
control field. If the character in the conii ol titiciis/iofa 
C, you want to put a.i X m the field before you so; L the 
records. To do this, you would use a roi ce-ai' iine to force 
the X into the control field. 

A force-all line follows a series of condaionai lurce lines. 
For example, you may want to tell disk sort. 

• If the control field contains a C, replace it with a i . 

• If the control field contains an h , i',pl,.r, c t vv;tn ,> 2. 

• If the control field contains a $, replace it witr^ a 3. 

• If the control field does not contain a C, an F, or a $, 
put an X in the control field. (You am forcing out all 
other possible entries by using a torce-aii line.) 



Field Desci iption Specitications 39 



An unconGitional force does not depend on entries in the 
input records. If, for exannple, you want to put a dollar 
sign ($) if Tie first position of every output record, you 
would 'jsf nn unconditional force. Your unconditional 
forced control field would tell disk sort to put a dollar sign 
in the first available control field position of the work record. 



If no summary specifications are given for a SORTRS type 
sort, the output file consists of records with unlike control 
fields as specified in the field statement. Disk sort deletes 
all records with common control fields. Only one copy 
of each is retained. 



-+- 



Control 
portion 



(Ids 



Data portion 



Any other control fields will go after the dollar sign. Assume 
the inp;j* records are in this format: 



Data 


Control 
field A 


Data 


Control 
field B 


Data 



The wori< record will then look like this: 



s 


Control 
field A 


Control 
field B 


Data 



See Column 19 for actual coding examples of forced con- 
trol fieids. 



Summary Data Fields (S in Column 7) 

An S in column 7 of the field description specifications de- 
fines a summary data field. You can define summary fields 
for ail three types of sort jobs, but the fields will be sum- 
marized (added together) only in summary sorts. In tag 
along sorts (SORTR), summary fields will be treated as nor- 
mal dati fields. In addrout sorts (SORTA), summary fields 
will be treated as comments. 

In a summary sort, the summary data fields in the work 
and output records for individual record types must always 
be in the same position. The fields do not have to be in the 
same position in the input records. (See messages SD278 
and SD280.) 

No more than 24 fields can be summarized for each record 
type. 

The f'nt include set that contains summary specifications 
defines the summary format for all included records. It is 
recomn-iended that all include sets contain summary speci- 
ficatierr^. If an include set does not contain summary 
specifications, the data specification should align the data 
for suTimarization. 



Column 8 (C/Z/D/P/U/V) 

Your column 8 entry indicates what portion of the input 
record's characters you want disk sort to use in building 
and sorting the work records. The column 8 entry is critical 
in assuring that the sort produces the results you intend. 
See Columns 7-8 to find the ways you can combine this 
entry with the column 7 entry. 







Maximum 


Col. 8 Entry 

C 


Character Portion Used 


Field Length 


Use both zone and digit 


256 characters 


Z 


portions of the characters 




Use only the zone portion 


1 character 


D 


of the character 




Use only the digit portion 


16 characters 


P 


of the characters 




The characters are signed. 


8 bytes or 


U 


packed decimal numbers' 
The characters are signed. 


15 digits and sign 


16 digits 


V 


unpacked decimal numbers' 
Force a data character into 




1 character 


' Note that -3 


the data field 
is less than and +5 is greater 




than -6. 



Suppose, for example, you have a 1 -character control field 
in your input records which can be either an *, 1 , 2, or 3. 
The zone and digit portion of each character is: 



Character 


Zone 


Digit 


' 


0101 


1100 


1 


1111 


0001 


2 


1111 


0010 


3 


1111 


0011 



If you want the records sorted into ascending order using 
the digit portion of the control field characters (by putting 
a D in column 8), they will be in this order: 



1 
2 
3 
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If you want the records sorted into ascending order using 
both the zone and digit portions (by putting a C in column 
8), they will be in this order: 



If your file contains different record types, all of which 
have an opposite control field in the same record position, 
your column 8 entries for these control fields must be one 
of the following; 

• All Ds 

• All Cs 



Suppose you placed a Z in column 8 and wanted the 
records sorted into ascending order. You can then be sure 
that the records with an * control field will precede the 
records with a 1 , 2, or 3 control field. Since 1 , 2, and 3 
have identical zone portions, records with any of these 
numbers as a control field will not be in any special order 
after the sort. 

If you want to force characters into your data field, place 
a V in column 8 and specify the character to be forced in 
column 18. That character will be placed in the first avail- 
able data field position of the work record. 

As you can see, your column 8 entry can drastically affect 
your sorted file. 



• All Zs 

• Any combination of Cs and Zs 

With any other combination of entries (for example, Ds and 
Cs), you will not be able to predict the results of the sort. 

When you use opposite control fields, disk sort changes 
them in building the work record. Therefore, you usually 
drop this meaningless control field information (by coding 
an X in column 28 on the header line) for tag along or 
summary sorts. If the opposite control fields are all Ds, 
you do not need to drop the control field. If you wish to 
retain the original control field data in the output record, 
repeat the information as a data field. 



Do not confuse this column 8 entry with the column 8 
entry on the record type specifications. Column 8 of the 
field type specifications tells disk sort what portion of a 
character to use to sort the records. The column 8 entry 
on the record type specifications helps select which records 
you want to be sorted. 



Opposite Control Fields 



Packed or Unpacked Control Fields (Normal or Opposite) 

If you specify packed or unpacked control fields, disk sort 
changes the control fields while building the work record. 
Therefore, you must drop the control field information by 
coding an X in column 28 on the header line. If you wish 
to retain the original control field data in the output record, 
repeat the information as a data field. 



If you vi/ant to sort records so that some control fields are 
in ascending order and other control fields are in descend- 
ing order, use opposite control fields. An opposite control 
field is sorted in ascending order (if you specify descending 
order on the header line), or in descending order (if you 
specify ascending order on the header line). 
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Forced Control Fields 

Here are a few rules to remember when you are using 
forced control fields: 

• You can have only one character in your forced control 
field. 

• You can mdicate either a conditional or an unconditional 
force. 

• A force-all line must be preceded by a conditional force 
line. 

• You define a forced control field by placing an F in 
column 7 of the field specifications. 

See Columns 9-16, Column 17, Column 18, and Column 
19 for further information on how to complete the field 
specifications. 



Suppose each record m your file that is sorted m ascending 
order (A in column 18 of the header line) has a normal 
control field in positions 1 7 and an opposite control field 
in positions 5-7, Each record refjresents one customer's 
order for a separate item. The part number is in position 
1-2; the number of parts otdered is in positions 5-7. Your 
unsorted file might look like this: 

Input record position 





1 


2 3 


4 5 


6 7 





1 


7 


1 


2 6 


1 


3 


4 


5 


1 2 


2 


1 


7 


1 


2 1 


3 


1 


5 




9 6 


4 


3 


4 




1 8 


5 


1 


7 




2 


6 


3 


4 


2 


b 



input Part 
frKiotd iiumtjer 
number 



Number 
orrjeieil 



Using Control Fields to Sequence Information in the Sorted 
Records 

The order in which you describe control fields in the field 
specification lines determines the sequence of the records 
(tag along sort) or the record addresses (addrout sort) in 
the sorted file. 



You can use the first control field to sort the records in 
ascending order according to the part number. You can 
then use the second control field to sort the number of 
parts ordered in descending order within each group of 
parts. Therefore, you want your sorted file to look like 
this: 



Output record position 







2 


3 


4 


5 







5 




9 


H 


1 




7 


1 


2 


6 


2 




7 


1 


2 


1 


3 




7 




2 





-1 


3 


4 


5 


1 


2 


b 


3 


4 


2 


5 









4 




1 


8 



Ou'out 


P.Ui 


'MumliO! 


recc'n; 


nurnb(!i 


ill fiered 


numbor 







42 



Include these field specifications lo do t!ie prti.edmy son 



IBM 



StQUtixICt SPECIF ICATIOiviS 
'leiitler 













"'-^^r-' - 








Tb'RT^ 





5W 






W: 



^Hr.ord Typt; 






I 


7 




:, , 1 








> 


, 1 




'' 


i 


'' , * 




t 










I 

i 



YILL leCOlOS LNCLUOeP lm s^ort 



^ieid 



n-. 




: 




i 


j 


1 ■ 
i ! 


...1 1 l\ 


Ic I 

If 5 


z 

t 

7 


1 
i 


i 
i 



I 



Notice that the information occupies li ^'.:ji; -' unsitioiis .n 
the input and output records. The leco d positions change 
when the control fields and daia fields .n moviKi fwjm 
the input to the work to the output files Sinct; dii opposi'e 
control field is specified, all the control tield; ,!i li i iiput 
record are dropped (columns 12 and b 7) To savi- tn^> con 
trol fields, specify them as data (see feXdnifil"* 



po/^r^oc FIELD 0£scj^i&6d ^5 mm 



Columns 7-8 

Heie are all the possible ronibinations tor columns 7 and 8: 









' Maximum 


Col. 7 


Co!. 


8 


Field Length 


N or 


C 
2 
D 
p 
U 






250 

1 

16 

16 


F 


r- 1 






1 

1 


D 

i 


C 

/ 

P 

U 
\/ 






?56 

1 

16 

8 

1 G 

1 


c 


c 

7 

P 

V 




i 
D 

(c 


256 

16 

8 
16 

1 

3es not apply 
omnnent line) 


1 F..I ..n 


jnconditiona! 


foicp and a 


1(>tce-dl 


line 


CO 


uinn 


8 musl con- 


(uiii .i C 











See Column 7 and Column 8 foi detailed discussions of 
each entry 
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Columns 9-16 (Field Location) 

Columns 9 16 identify the input record positions that con- 
tain the record fields. Columns 9-12 (from) identify the 
starting position of a field: columns 13-16 (to) identify the 
position in which the field ends. 

The order in which you describe the fields in the field 
description specifications determines the order they will 
be in in the sorted output records. 

For example, suppose you have an input record that looks 
like this: 



Field name 



Record position 1 



inpui record 



ITEM 

(item 
r-;umber) 




PRICE 

(pi ice 
per item) 




BAL 

{numijer in 
slock) 




REORD 

(reorder 
point) 

























5 7 



12 15 



21 23 



29 



However, you want your sorted output record to look like 
this: 



Output record 



Eieid iiiime 



Recoid position 



ITEM 


REORD 


BAL 


" 













5 6 



12 13 



19 



Assuming that you want to sort the records by item num- 
ber, here is how you would fill out the field description 
specifications: 



Field 



— -^-T-l 


-- 








i 

1 




' 


pi 

r 

i i 
1 ( 

-J L 


c. . 16 


■3 
11 


i 




dAL 1 
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As another example, if you want the 1 -character field in 
position 20 of your input record to be in the first position 
of the sorted output record, you would describe the field 
in the first line of your field description specifications. In 
this example, the primary control field for the output file 
is determined by position 20 of the record: 



1 ,,.,. 


\ 












> 
1 


To 


>5 J 


- _ 


..,.,,. 


h 


1 ■ - 4 

i ^ 

i ■ : ■ 


! ■ ■ 



















Field Length 

The length of the field depends on the column 8 entry. 
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Column 17 (Conditionally Forced Control Fields) 

See Column 7 for general discussion of forced control 
fields. You make an entry in column 17 only when you 
want to use a conditional force. (For example, if you 
want to put an * in a control field only if the present entry 
is an A.) When you use conditional force, the input record 
does not change, but the work and output records will con- 
tain an * instead of an A. (See Column 7 or Column 18 
for more information about conditional force.) 

The column 17 entry tells disk sort which character in the 
control field (defined in columns 13-16) you want to re- 
place. The program checks to see if the control field in 
the work record contains the character you specified in 
column 17. If it does, the character in column 1 8 replaces 
the control field character. 

If a control field can contain any one of several characters 
and you want to specify a forced character replacement 
for each one, you must include a column 19 entry in all 
the forced field lines (except the first). See Column 19 for 
instructions. 



Col. 8 Entry 


Maximum Field Length 


C 


256 characters 


z 


1 character 


p 


8 characters 


u 


16 characters 


D 


16 characters 


V 


1 character 



Coding Rules 

Entries must be right-justified. The from entry must end 
in column 12; the to entry must end in column 1 6. 

To describe fields that are only one character long, leave 
columns 9-12 (from) blank, and enter the number of the 
record position that contains the character in columns 
13-16 (to). 



Column 18 (Forced Character) 

See Column 7 for general discussion of forced fields. You 
make an entry in column 18 when you are using forced 
control fields to sort your records or forced data fields. In 
forcing a control field, the character in column 18 either 
replaces the character specified in column 17 or adds a 
new character. In forcing a data field, the character in 
column 18 is added to the output record at the first 
available data field position in the work record. 

Remember that the change to the field does not alter 
your input record. Remember, too, that you must use 
forced characters only with 1 -character fields. 
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Defining a Conditional Force Cfiaracter 

1. Fill in columns 1-6 as you would for any control 
field. 

2. Put an F in column 7. 

3. Define the position of the control field in the input 
record in columns 13-16. 

4. Enter the character you want to replace in column 17. 

5. Enter the character you want to replace it with in 
column 18 (you can use any System/3 character in 
column 18). 



Defining a Force-All Character 

1. Fill in columns 1-6 as you would for any control 
field. 

2. Put an F in column 7. 

3. Put the character which replaces the control field in 
column 18. 

4. Put any System/3 character in column 19. (The 
character in column 19 tells disk sort that the line 
is a continuation of the preceding line.) 

5. Leave columns 9-17 blank. 

If you do not place a force-all line after conditional force 
lines and disk sort does not find the specified characters in 
the control field of the input record, disk sort: 

• Replaces the control field character with hex FF (if you 
specified ascending sequence in the header line). 

• Replaces the control field character with hex 00 (if you 
specified descending sequence in the header line). 



Specifying an Overflow Indicator Field 

1. Fill in columns 1-6 as you would for any control 
field. 



2. 
3. 
4. 



Put an S in column 7. 

Put a V in column 8. 

Enter a character in column 17 if you do not wish to 
use an * as a replacement. If overflow occurs in any 
summary data field in the record, the initial value of 
the overflow field will be replaced by the character 
in column 17. 

Enter a character in column 18. If none of the sum- 
mary data fields overflow, the overflow field will 
contain the character specified in column 18. 



Column 19 (Specifying Replacements for More Than One 
Character of a Forced Control Field) 

If a control field in the input record can contain any one of 
several characters and you want to specify forced character 
replacements for more than one character, use a separate 
line to define each possible character and the forced charac- 
ter you want to replace it with. 

Note that column 19 is assumed blank for the first field 
statement of an include set. 



Coding Rules 

1. Define the control field in columns 13-16. 

2. Enter the first character you want to replace in 
column 17. 

3. Enter the character you want to replace it with in 
column 18. 



Defining an Unconditional Force Character 

1. Fill in columns 1-6 as you would for any control 
field. 

2. Put an F in column 7. 

3. Put the character you are forcing in column 18. 

4. Leave columns 9-17 blank. 

Sample Job 4 illustrates the use of conditionally forced 
characters to group record types. 
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4. Enter the next character you want to replace in 
column 17 of the next card. 

5. Enter the character you want to replace it with in 
column 18. 

6. Enter any character (except blank) in column 19. 
This tells disk sort the line refers to the same control 
field in the work record as the preceding line. 

Repeat steps 4, 5, and 6 for any other characters to be 
replaced in that control field. 

Note that you can use any System/3 character you want in 
column 18. 



Examples of Using Forced Control Fields 

You can use forced control fields to chdiige (add to or re 
place) a character in a 1 position control tield. The follow- 
ing examples represent these types of forced control 
characters' 

• Unconditional toce 

• Conditional force using only forced control fields 



• Conditional force using normal or opposite and forced 

control fields 

• Force all 



Unconditionally Forced Character 

This example illustrates how you can unconditionally place 
a control field into the work and output records: 



Positior 1 (control field) 20-22 (data field) 



Input record 



F leld des*;ription 
speciiications 



Woi k record 



Output recoiLj 



7L 



572 



2 



22 



! 


572 



Control Data 

field field 



-V 


572 



7 



This unconditional force 
moves a + into the first 
available work record po- 
sition. 

IVlove the data tield (po- 
sitions 20-22 of the input 
record) to the next three 
positions of the work record. 



Control 
field 



Data 
tieid 
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Conditional Force Using Only Forced Control Fields 

This example illustrates how control field characters change 
according to the conditions you specify. 



Input records 



Position 



Field description 
specifications 



Work records 



Output records 



4 {control field) 



20-22 (data field) 



71. 



618 



7 



71 



1 <L 



V'Q. 



m 






2^ 



B3 



1 


618 


3 


510 


2 


307 



Control Data 
field field 



I 



1 


618 


2 


307 


3 


510 



510 



7 



307 



7 



"i_ 



If position 4 of the input record contains 
an A, move a 1 into the work record. 

If position 4 contains a B, move a 3 into 
the work record. 

If position 4 contains a C, move a 2 into 
the work record. 

Move the data field (positions 
20 22 of the input record) to 
the work record. 



Control Data 
field field 
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This example also shows how you use column 19 to specify 
conditional replacements for more than one character. Be- 
cause continuation lines are used, only one position in the 
work and output records is defined by the first three lines. 
If column 19 is left blank, each line would define a new 
position in the work and output records. 

If you are sorting records into ascending order (A in column 
18 of the header line), disk sort places hex FF into the work 
record before you force any characters. If you are sorting 
records into descending order (D in column 18 of the header 
line), disk sort places hex 00 into the work record before 
you force any characters. Therefore, if disk sort does not 
find an A, B, or C in position 4 of the input record, the hex 
00 or FF is left unchanged in the work record. 



Conditional Force Using Normal or Opposite and Forced 
Control Fields 

This example is similar to the previous one since the con- 
trol field in the input record causes changes in the work 
and output records. In this case, however, disk so.t first 
moves the control field to the work record (because the 
first control field is a normal control field) and then changes 
it if necessary. Notice that any forced character replace- 
ments are made before the records are sorted. 
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Input records 



Position: 1 (control field) 



Field description 
specifications 



Work records 



Sorted output records 



20-22 (data field) 



7^ 



510 



7 



7 <L 



^11 



7 



71. 



618 



7 



^^ 



2^ 



22 



Move the control field (in position 1 
of tfie input record) to the work rec- 
ord and use it to sort the records into 
order (assume that ascending order is 
specified on the header line). 

If position 1 of the input record contains 
a 9, replace it with a 7 in the work record. 

If position 1 of the input record contains 
a 7, replace it with a 9 in the work record. 

Move the data field (positions 
20-22 of the input record) to 
the work record. 



5 


510 


9 


822 


7 


618 



Control Data 
field field 



1 



5 


510 


7 


618 


9 


822 



Control Data 
field field 
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Force- All 

Suppose your control field can contain characters other 
than A, B, or C. If you don't want a hex FF or 00 in the 
work and output records, use a force-all line. 



Position: 



Input records 



Field description 
specifications 



Work records 



Output records 



1 (control field) 



20-22 (data field) 



7<L 



177 



7 



71 



521 



7 





'; 


















i„„„, 1 


Nui-nli.T 






r,t 


1 


1 


i 


1 


^ : 

9 \ 
1 

1 1 




F 
F 
F 
F 



C 

c 
c 
c 

c 






20 






2 


1 
1 
1 

2 


B 
C 


1 

3 
2 


X 
X 
X 



"~L 



if position 1 of the input record contains 
an A, move a 1 into the work record. 

If position 1 contains a B, move a 3 into 
the work record. 

If position 1 contains a C, move a 2 into 
the work record. 

This is a force-all line. If position 1 of the 
input record does not contain an A, B, or 
C, place an * into the first available work 
record position. 

Move the data field (positions 
20-22 of the input record) to 
the work record. 



1 


177 


• 


521 



Control 
field 



Data 
field 



1 



1 


177 


« 


521 



Control Data 
field field 
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Columns 20 22 (Overflow Field Length Entry) 

These columns are used only by a summary tag along sort 
to eliminate the possibility of an overflow condition. 

You can eliminate the possibility of an overflow condition 
by increasing the length of the summary data field to allow 
for any anticipated overflow. This can be done by coding 
an overflow field length entry in columns 20-22 of the field 
description specifications. The overflow field length entry 
should reflect the sum of the summary data field length 
and the anticipated overflow length. The entry must be 
right-justified to column 22, and cannot exceed the maxi- 
)-ii-m\ field length. 

Columns 20-22 are ignored for an FSZ and FSV since these 
fields can be only one byte long. 

For example, if you want to summarize an unpacked field 
in positions 6-10 of your input record and you know that 
the output will exceed the 5-position summary field by 2 
positions, specify a 7 in column 22: 



Columns 23-39 

These columns are not used. Leave them blank. 

Columns 40-72 (Comments) 

Columns 40-72 are for your comments. If you instructed 
disk sort to print sequence specifications (column 27 of the 
header line is either blank or contains a zero), comments 
are printed along with your sequence specifications. The 
comments have no effect on the program's operation. 

Columns 40-45 are enclosed in dotted lines on the coding 
sheet, because many programmers like to use these columns 
to write the names of fields they described in the field lines. 



7 F S U 








6 






1 















7 











If packed fields are summarized, columns 20-22 should 
specify the number of bytes of packed data. 

For example, if you want to summarize a packed field in 
positions 1-3 of your input record and you know that the 
output will exceed the 3-position packed summary field 
(5 numbers plus sign) by 1 position, specify a 4 in column 
22 (7 numbers plus sign): 



" '■^1 H-^rl I I 1 3 4 



Note: When some include sets do not contain summary 
specifications, care should be taken to align the data for 
summarization. 
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Chapter 6. Sample Disk Sort Jobs 



Each job in this section has: 

1. An introduction explaining its purpose 

2. Filled-out sequence specification sheets 

3. Discussion of the sequence specifications 

The first six jobs use one or more of the following files and 
input records. (Sample Job 7 uses other files and input 
records, which are explained in the introduction to that 
job. Sample Job 8 uses the inventory file and input records, 
and is included to illustrate multivolume multiple device 
input. Sample Job 9 uses the inventory file and input 
records, and is included to illustrate record selection on 
hexadecimal input.) 



Files 


Records in Files 


Contents of Records 


Inventory file 


Inventory records 


Quantities of items in stock 

Number of transactions for each stock item 


Transaction file 


Issue records 


Shipments of items to customers 


Receipt records 


Purchases of more items from suppliers (vendors) 


Adjustment records 


Corrections to inventory quantities 
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The format of the four types of records are shown in the 
following charts: 



Record Formats for the Inventory File 



Inventory 

Record Field 

Positions Names 



Record Formats for the Transaction File 



1-6 ITEM 

7-10 CLASS 

11-24 DESC 



25-27 
28-29 



30-34 
35-39 

40-45 

46-50 

51-56 
58-62 

69-74 

75-80 
81-86 
87-91 
92-96 

97-99 

100-105 
106-111 



LOC 
UNIT 

COST 
PRICE 

REORD 

QTY 

BAL 
ORDER 

AVAIL 

PORDER 
PDATE 
VEND1 
VEND2 

TRANS 

TDATE 
ISSUES 



Contents 

Item information 

Number of stock item to 
which the record applies 

Class of the item (men's cloth- 
ing, jewelry, etc) 

Description of the item 

Stocic status and reorder 

information 

Location of the warehouse 

where item is stored 
Unit of measure for ordering 

the item (by the pound, by 

the dozen, etc) 
Cost of the item per unit 
Price (per unit) at which 

item is sold 
Reorder point (lowest stock 

quantity allowed) 
Number of units to order 

when reordering 
Number of units in stock 
Number of units ordered, but 

not yet received 
Number of units available 

(BAL -I- ORDER) 
Purchase order number 
Date of purchase order 
First vendor 
Second vendor 

Transaction activity 
Number of transactions for 
this period 
Data of last transaction 
Number of units issued dur- 
ing this period 



Record 
Positions 

1 

2-7 

8-12 



Field 
Names 



ITEM 



QTY 



Contents 

Issue Record 

I (identifies this record as an 

Issue record) 
Number of the stock item to 

which record applies 
Number of units ordered (5 

dozen, 32 pounds, etc) 
Customer number 
Invoice number 
Date of the order 
Discount information 
Price of the item per unit 
The constant 001 
Total cost of items ordered 

Receipt Record 

R (identifies this record as a 

receipt record) 
Class of the item ordered 

(men's clothing, jewelry, etc) 
Number of the item ordered 
Price of the item per unit (by 

the dozen, by the pound, 

etc) 
Purchase order number 
Number of units ordered 

Adjustment Record 

A (identifies this record as an 

adjustment record) 
Number of the stock item to 

which record applies) 
Adjustment code (identifies 

reason for the adjustment) 
Number of units (dozen, 

pounds, etc) being added or 

subtracted 
Authorization for the 

adjustment 
Date of the adjustment 



Any unsigned numeric field (packed or unpacked) can be treated 
as character information. 



13-19 


CUST 


20-27 


INV 


28-33 


DATE 


34 


DIS 


35-39 


PRICE 


40-42 


C0N1 


43-50 


COST 


1 


ID 


2-5 


CLASS 


6-11 


ITEM 


12-16 


PRICE 


17-22 


PORDER 


23-27 


QTY 


1 


ID 


2-7 


ITEM 


8 


CODE 


9-13 


QTY 


14-17 


OK 


18-23 


DATE 



Any unsigned numeric field (packed or unpacked) can be treated 
as character information. 
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SAMPLE JOB 1: INCLUDE ON FIELD RELATIONSHIP 

To illustrate an INCLUDE on field relationship, this sample 
job produces a file of inventory information for reordering 
stock items. 

The program selects inventory records for stock items for 
which the quantity on hand ( AVAI L field) is less than or 
equal to the reorder point (REORD field). 

Output records are to contain information needed to reorder 
the items. The information is in these fields: CLASS, 
ITEM, DESC, UNIT, COST, QTY, AVAIL, PDATE, 
VEND1, VEND2, and PORDER. 

Output records are to be in ascending order by class (CLASS 
field) and by item numbers (ITEM field) within each class. 



IBM 



SEQUENCE SPECIFICATIONS 
Header 



r niui 



sk?^r/g: I ; ~jw 



m 



^^^^^^ 



Record Type 



Liiir 


.„.,.„, 


.,,.. 




C„nu,».„., 


_ ' 


.■■JL 
L 1 

uT -, 
■■ E 

(iL L 


^ K,.v..-...,.i ^ 


Consryni ♦■ 


1 

,„, ,,,! 1 

1 


■:;i^ 


.„n 


J ' ■■' 


Tu 

M .-S ?.. .'! 




I) 4 


D 1 <^[9 


1 ■ 1 
. 1 ■ 


1 


'' 1 

! ! i 


1 ■ 1 


i , 1 i ■ i : ^ i ■ ' 


4y/)'J\L^ F[i\p, 10 3 s i?\e 'm W, f^fpRp. 'F\pt>_ 

1 ' : ■ : ; , 

•■■''■•: \ ■■■'•■■■ \ ■• ' ' i ■ ; ■ ■ 

. , , ,,,!.. ,;,,:,,.. i ; : , 1 : . 1- 

1 ■ i ' 1 








i i 1 1 1 i . 1 i i 1 . . , \ \ ' \ \ '. 


i i i 


. 


1 i < < < i . 



Field 



I n, 






! 

1 


c ,. 


\ 




~ — — — 1 

M.ini,- ] 


' ' 4 ! 1 ' 


IC 7 
IC\ i 
'a 11 

?c 31 


\ ti, 


,| 1 1 1 1 1 1 ' 1 ■ 1 ' ! ■ ' 

[ Total ~ 10 characters ; 

1 Total — 54 characters 

> (including VEND1,VEND2,- 

( and PORDER on page 02) 


treM, \ 1 WolX x/en WnfiBP^ , ; : : : : : i 
uMi T \ uftiT OF m^bu^e i . , . 

Cqst 1 Cost Pe^ UMir ..:.:;,_ 

?/•/ 1 ^^^F.dF/^ piJAr/Tiry : : I . 
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Since then is not enough space on the first coding sheet for 
the last three fields, they are coded on a second sheet. To 
show the p'oper sequence for the last three fields, put a 02 
in columnF ' -2 of the second coding sheet; 



IBM 



DC 
D 



?.7 



91 

u 



"W 



SEQUENCE SPECIFICATIONS 
Header 



,., '^121 



Field 



\ieNpL 

MENDi. 
PoUDER} 



FLR.sr \/eMjJOK i 

SecoND \/eNooi?: 



Header r>pecifications 

Column 6 

The H identifies the line as a header line. 

Columns 7-12 

SORTP identifies the job as a tag along sort. 



Columns 13-17 

The control fields used to sort records in this job are CLASS 
and ITEM. The total of their lengths is 10, which is the 
entry for columns 13-17. 



Column 18 

The A s■'^^as for ascending order. Output records are to be 
sorted into ascending order by CLASS and ITEIVI fields. 



Columns 29-32 

The ou:put records contain eleven fields, including two 
control fit Ids (CLASS and ITEIVI) and nine data fields. Con- 
trol fields are not being dropped (colunnn 28 blank). There- 
fore, the length of the output record is the total length (64) 
of all eleven fields described in field specifications. 



Record Type Specifications 

Column 6 

The I identifies the line as an include line. The input 
records described by the line are used by the program. All 
others are omitted. 

Column 8 

Both factor 1 and factor 2 fields are numeric positive fields. 
The D in column 8 causes zeros and blanks to be considered 
equal in case leading zeros were not recorded. 

Columns 9- 16, 17- 18, and 20-27 

Inventory records for which the number of units available 
(AVAIL) is equal to or less than the reorder point (RE- 
ORD) are selected: 

• Columns 9-1 6 identify the location of the AV Al L field 
(record positions 69-74). 

• Columns 20-27 identify the location of the REORD 
field (record positions 40-45). 

• Columns 17-18 define the relation between the two 
fields. 

Column 19 

An F in column 19 indicates that factor 1 is compared to 
the field located by the entries in columns 20-27. 
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Field Specifications 

Column 6 

The F identifies the lines as field specification lines. 



Column 8 

Zone and digit portions of all fields are used as they appear 
in the input records. 



Column 7 

The first two fields described (CLASS and ITEM) are nor- 
mal control fields. The rest are data fields. All are included 
in the output record (column 28 of header line is blank). 



Columns 9-16 

Columns 9-16 identify the locations of fields in the input 
records. 



The records are sorted into ascending order by the CLASS 
field. Within each class, the item numbers (ITEM field) 
are in ascending order. 



CLASS Sequence ITEM Sequence 



Lowest class number 



Elach higher 
class number 



Lowesi item number 
Next higher item number 
Third higher item number 



Highest item number 



Highest class number 



L ovvest item number 
Next higher item number 
Third higher item number 



Highest item number 



Lowest Item numt:)er 
Next higher item number 
Third higher item number 



Highest itemi number 



Sequence of Records in 
Sorted Output File 



Lowest class number — Lowest item number 
Lowest class number - Next higher item number 
Lowest class number - Third higher item number 



Lowest class number Highest item number 



Class number Lowest item number 
Class number Next higher item number 
Class number - Third higher item number 



Class number Highest item number 



Highest class number — Lowest item number 
Highest class number - Next higher item number 
Highest class number — Third higher item number 



Highest class number - Highest item number 
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SAMPLE JOB 2: ADDROUT SORT 

To illustrate an addrout sort, this sample job produces 
a record address file for an entire inventory file. 

Assume that the inventory file is an indexed file. The 
ITEM field is the record key used in the index (the record 
keys are in ascending order). 

This job creates a record address file containing relative 
record numbers of all records in the file. It sorts them into 
ascending order by the CLASS field. Within each class, 
addresses are also sorted into ascending order by ITEM 
field. 

As a result of this job, inventory records can be processed 
consecutively in either of two ways: 

1. By using the file index, which is in ascending order 
by ITEM field. 



Header Specifications 

Column 6 

The H identifies the line as a header line. 

Columns 7- 12 

SORTA identifies the job as an addrout sort. 

Columns 13-17 

The control fields used to sort addresses in this job are 
CLASS and ITEM. The total of their length is 10, which 
is the entry tor columns 13-17. 

Column 18 



2. By using the record address file created by the disk 
sort program, which is in ascending order by CLASS 
and also by ITEM within each class. 



The A stands for ascending order. The records are sorted 
into ascending order by iteiri class (CLASS field), and by 
item number (ITEM field) withm each class. 



IBM 



S0£tTV Hw 



SEQUENCE SPECIFICATIONS 
Hedder 






Record Type 



Field 



Total — 10 characters 



<^'j: 



CC/)5S \ CLft-^^ O? IT£M--J€\i}£Lfl.y, BTC 
ITEM ! STOCK J-TbH H\JiHMi?. 
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Record Type Specifications 

Because all input records are being used and all have the 
same field specifications, no record type specifications are 
needed (include-all is implied). 



Field Specifications 

Column 6 

The F identifies the lines as field specification lines. 

Column 7 

Both fields (CLASS and ITEM) arc normal control fields. 
The record addresses are sorted into ascending order by 
CLASS field and by ITEM field within each class; 



Column 8 

The C means tiiat both /one and digit portions of the 
characters in the CLASS field are used in the sorting 
process. 

The D means that only the digit portions of the characters 
in the ITEM field are used in the sorting process. This 
causes blanks to be treated as zeros. 



Columns 9-16 

The CLASS field is located in positions 7-10 of the input 
records. 

The ITEM field is located in positions 1-6 of the input 
records. 



CLASS Sequence 


ITEM Sequence 


Sequence of Records in 
Sorted Output File 


Lowest class number 


Lowest item number 
Next higher irem numbor 
Third higher item nurnbni 

Highest liern number 


Lowest class number Lowest item number 
Lowest class number - Next higher item number 
Lowest class numbei -- Thircl higher item number 

Lowest class number Highest item number 


Each higher 
class number 


Lowest item number 
Next higher item number 
Third higher irem iiiimber 

Highest item number 


Class numbei Lowest item number 
Class numbei - Next higher item number 
Class number - Third higher item number 

■ 
Class numbei Highest item number 


Highest class number 


Lowest item nurriiret 
Next higher item numbei 
Third higher ttern nuinhn 

Highest item number 


Highest class number Lowest item number 
Highest class number Next higher item number 
HighesI class number Third higher item number 

Highest class number - Highest item number 
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SAMPLE JOB 3: AND LOGIC-OPPOSITE CONTROL 
FIELDS 

The program selects inventory records for stock items in 
classes 0126-0130. 

Output records are to contain only inventory information 
that indicates the activity (transactions) involving the stock 
items. The information IS in these fields: ITEM, CLASS, 
TRANS, and ISSUES. 

Output records are to be sorted in ascending order by class 
(CLASS field), and in descending order by number of trans- 
actions (TRANS field) within each class. 



Watch 
sequence 



E 



IBM 


























SEQUENCE SPECIFICATIONS -, _ , ,',■, ■', 

Header iv^OTXi ,,:,:. ;,o„.i i ; 1 J J i 




















^ ' _ \ 

























r 






^^lTi\ 


L _ ^ /J 


kl J 


















X, 


i9 




1 ' • ' • i , ; i . 















Record Type 


■ " 




.;. ■ 


„•. .■.. ,.■,: ( ,„v, . , .,,,..,,, 








'' '■ 


-1 K,.v,,,,, .-^ 




1 

1 






. 


... 


: . If 


DI 7 

m 7 




sec 








■'■'■■■!"" ; , . 1 , . . . , 

■ ■ 1 , 1 




1 i 

' 1 ■ ' ■ . , . , . 

1 
1 






95 



Field 



Op 

J>q 
PC 

DC 



7 
97 

1 
97 

7 



9' 

y 

99 
Lit 



{■ Total — 7 characters 



Total — 19 characters 



IT£M 
TRfiNS 

LSSUfS 



HUMBeH OF jUAUS^CTlOf^S 

^L/?s$ OF xr^fi- -stmU9>eTc 

HUfi&Ffi OF UHITS ISSUFD 
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Header Specifications 

Column 6 

The H identifies the line as a header line. 

Columns 7- 12 

SORTR identifies the job as a tag along sort. 



Record Type Specifications 

Column 6 

The I identifies the record type lines as include lines. The 
input records described by these lines are used by the 
program. All others are omitted. 

Column 7 



Columns 13-17 

The control fields used to sort records in this job are CLASS 
and TRANS. The total of their lengths is 7, which is the 
entry for columns 13-17. 



The A in column 7 means that line 02 is a continuation of 
the definition of the record described in line 01. A means 
AND. An input record must meet all conditions listed in 
lines 01 and 02 before it is included. 



Column 8 



Column 18 

The A stands for ascending order. One control field 
(CLASS) is defined as a normal control field in field 
specifications. The other control field (TRANS) is an 
opposite control field. The records, therefore, are sorted 
into ascending order by item class (CLASS field), and into 
descending order by number or transactions (TRANS field) 
within each class. 



The D in column 8 of lines 01 and 02 means that the digit 
portions of the characters in positions 7-10 of the records 
(factor 1) is compared with the digit portion of the con- 
stants 0126 and 0130 (factor 2). Leading blanks in posi- 
tions 7-10 would be treated like zeros. Therefore, lzl126 
(% is blank) and 0126 would be considered equal. 



Columns 9-16, 1 7- 18, and 20-39 



Column 28 



Inventory records that indicate the activity (transactions) 
of stock classes 0126-0130 are to be selected: 



The X indicates that control fields are being dropped from 
the output records because the TRANS field is an opposite 
control field. The program must convert the information 
from the TRANS field into a special form so that the 
records can be sorted properly. The program does not 
return the information to its original form after sorting. 
The information, therefore, would be meaningless. 

The information from these two fields, however, is neces- 
sary in the output records. Therefore, the fields are also 
defined as data fields (see the explanation of column 7 of 
the field specifications for this example). 



• Columns 9-1 6 (factor 1) identify the location of the 
CLASS field (record positions 7-10). The CLASS field 
contains 4-digit class numbers. 

• Columns 20-23 list constants (C in column 19), that in 
this example define the upper and lower limits of the 
classes being selected from the inventory file. 

• Columns 17-18 define the relationship between the 
input record field being used to build the file (factor 1 ) 
and the constants in factor 2. All inventory classes 
equal to or greater than (GE) 0126 and equal to or less 
than (LE) 0130 are to be included m the sorted file. 



Columns 29-32 

Because control fields are dropped from the output records, 
the length of the output records is the total -length of the 
fields defined as data fields in field specifications. The 
length is 19, which is the entry in columns 29-32. 



Columns 19 and Columns 20-39 

The C in column 19 indicates that factor 1 is compared to a 
constant in columns 20-39. The constant in line 01 is 
0130; the constant in line 02 is 0126. 
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Field Specifications 

Column 6 

The F in column 6 of lines 07-12 Indicates that the lines are 
field specification lines. 

Column 7 

Column 7 indicates the type of fields being described. The 
fields described in lines 07 and 08 (CLASS and TRANS, 
respectively) are control fields. CLASS is a normal control 
field. TITANS is an opposite control field. Output records 
are sorted so that CLASS fields are m the order indicated 
in column 18 of the header specifications (ascendmg order). 
Records having the same CLASS field are in descending 
order according to the TRANS field. 



The fields described in lines 09-12 are data fields. They are 
included m the output record but have no effect on the 
sequence of the records. 

Note that the CLASS and TRANS fields are described 
once as control fields and once as data fields because 
TRANS is an opposite control field. Its contents in the 
control field portion of the output records are changed in 
the sorting process and would be meaningless for later 
processing. Therefore the control fields are dropped from 
the output records (X in column 28 of the header specifica- 
tions) and CLASS and TRANS are defined as data fields so 
they would still appear in the output records. 

The form of the output record is as follows: 



PoSltiO'lS 



ITEM CLASS 

i 
-« <■- 61/-^ 



10 



TRANS ISSUES 



11 -* .- 13 14-1 .-19 
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SAMPLE JOB 4: MULTIPLE INCLUDE SETS WITH FORCE 

This sample job produces a history file o1 trdnsaction in 
formation by selecting records for all transactions in the 
transaction file. 

The entire file of input records is used in creating output 
records. The output records will be used to produce a his- 
tory of the activity involving various stock items. 

Output records are sorted by record type: RECEIPT 
records first, ISSUE records second, and ADJUST (adjust- 
ment) records last. Each type of record is sorted into 
ascending order by item number (ITEM field). The ISSUE 
records also have a subcontrol field - DATE OF ORDER. 
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Header Specifications 

Column 6 

The H identifies the line as a header line. 

Columns 7-12 

SORTR identifies the job as a tag along sort. 

Columns 13-17 

Three types of records are described, one on each sheet. 
The total length of the control fields for each type of 
record Is 7, 13 and 7 characters, respectively. The largest 
of these totals (13) is the entry used in columns 13-17. 

Column 18 

The A stands for ascending order. It indicates the order 
into which output records (described in the three sets of 
field lines) will be sorted. 



Columns 29-32 

The total length of control fields for each type of record 
described is 7, 13, and 7 respectively. The total length of 
data fields for each type of record is 20, 26, and 16 respec- 
tively. The largest control field total (13) is added to the 
largest data field total (26) and the result (39) is used in 
columns 29-32. 



Record Type Specifications 
Column 6 



In the record type lines, columns 9-39 have the following 
meanings: 

• Columns 9-16 identify the input record position (position 
1 ) being compared against R, I, and A. 

• Columns 17-18 indicate the comparison result that deter- 
mines whether an input record is used (the cnaracter in 
position 1 must equal R, I, or A). 

• C in column 19 of each line indicates that the characters 
against which the input record character is compared 
are constants supplied in columns 20-39. 

• Columns 20-39 supply the constants (R, I, and A, res- 
pectively) used in the comparison. 



Field Specifications 

Field specifications differ for the three types of records 
being described. The records, therefore, were described on 
separate coding sheets. 



Column 6 

The F in column 6 of lines 07-12 on sheet 01, lines 07-14 
on sheet 02, and lines 07-12 on sheet 03 indicate that the 
lines are field lines. 



Column 7 

Column 7 indicates the types of fields being described for 
each of the three types of records. The records described 
by sheets 01 and 03 (RECEIPT and ADJUST records 
respectively) have two control fields. The records describ- 
ed by sheet 02 (ISSUE records) have three. The remaining 
fields described are data fields. 



Column 6 in line 01 of each of the three sheets contains an 
I indicating that the lines are include lines. The input 
records described by these lines are used by the program. 
All others are omitted. 



Column 8, Columns 9-16, Columns 17-18, Column 19, and 
Columns 20-39 

Column 8 in line 01 of each of the three sheets contains a 
C indicating that the entire character in position 1 of the 
input records is to be compared with the constants R, I, 
and A respectively. Only input records with one of those 
characters in position 1 will be included in ths job. 
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These diagrams show the formats of the output records that 
will be created from each of the three types of input records. 
The numbers underneath the field identification blocks indi- 
cate the position that information will occupy in the output 
record. 
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The first control field in each type of output record is a 
forced control field. The number 1 will begin every 
RECEIPT output record, 2 will begin ISSUE records, and 
3 will begin ADJUST records. This forces all RECEIPT 
output records to be first, all ISSUE records second, and 
all ADJUST records third. 

The output records for this job must be the same length. 
The total number of characters in the control fields 
described for RECEIPT and ADJUST was less than the 
total for ISSUE records (the control field length for ISSUE 
on the header is used to assign the absolute length of the 
control field). Therefore, the program added binary zeros 
at the end of the control fields for RECEIPT and ADJUST 
output records. Blanks were added at the end of the data 
portion of RECEIPT and ADJUST output records to make 
the total length of the records equal to the total length of 
ISSUE output records. 



Columns 9- 16 and Column 18 

Columns 9-16 of the field lines identify the locations of the 
fields in the input records. 

The first control field for each type of record is a forced 
control field. On each sheet, it is described by a force-all 
line. For this reason, columns 9-16 are blank in those lines. 
Column 18 identifies the character to be used in the forced 
control field: 1 in output records created from RECEIPT 
records, 2 in ISSUE output records, and 3 in ADJUST out- 
put records. 
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SAMPLE JOB 5: SUMMARY SORT-ELIMINATING 
DUPLICATES 

This sample job produces a list of inventory items requir- 
ing adjustments by selecting all adjustment records in the 
transaction file. 

The output record is a control field consisting of the stock 
item number only. 

Since the output record consists of no data field and, in 
particular, no summary data fields, the result of the 
SORTRS job will be to eliminate all duplicate adjustment 
stock item numbers from the file. 

The output records, each consisting of a unique stock item 
number that had an adjustment, are to be in ascending order. 

The output provides a list of all stock items that had an 
adjustment. 
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Header Specifications 

Column 6 

The H identifies the line as a header line. 



Column 7 

Line 01 is the first (and only) include line of this include 
set consisting of lines 01 and 07. Therefore, column 7 
must be blank. 



Columns 7- 12 

SORTRS identifies the job as a summary sort. 

Columns 13-17 

Only one control field is used in this job; ITEM. Its 
length is 6, which is the entry for columns 13-17. 

Column 18 

The A stands for ascending order. 

Columns 29-32 

The output record consists of one control field only. The 
output record length is 6, the control field length. 

Record Type Specifications 

Column 6 

The I identifies the record type line 01 as an include line. 
Input records described by this line are to be sorted. 
Since this is the only include set, all other records are 
omitted. 



Column 8 

The C in column 8 tells disk sort to use both the zone and 
digit portions of the factor 1 and factor 2 fields described 
in line 01 . 



Columns 13-16, 17-18, 19, and 20 

Only adjustment records containing an A in position 1 are 
to be included in the sort. 



Field Specifications 

Column 6 

The F in column 6 of line 07 indicates that this is a field 
specification line. 

Columns 7 and 8 

The NC in columns 7 and 8 of line 07 indicates that it is a 
normal control field consisting of both the zone and digit 
portions of the characters in the input records included in 
the sort. 

Columns 9- 16 

Columns 9-16 of line 07 identify the location of the stock 
item number (having a length of 6) that is to be used as the 
control field. 
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SAMPLE JOB 6: SUMMARY SORT-INSERTION OF 
CHARACTER DATA-FDV 

This sample job produces a summary history file of issues 
by customer number by selecting all ISSUE records from 
the transaction file. 

Using a summary sort (SORTRS), a file is to be formed con- 
sisting of each customer to whom any stock item was issued. 

Each output record consists of a unique customer number, 
the total number of issues it had, and the total dollar value 
of all the issues. 

The output records are to be in ascending order by customer 
number. 
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Header Specifications 

Column 6 

The H identifies the line as a header line. 



Columns 8, 16, 17-18, 19, and 20 

Only ISSUE records containing the full character I in posi 
tion 1 of the input records are to be included in the sort. 



Columns 7- 12 

SOR TRS identifies the job as a summary sort. 

Columns 13-17 

The work record as well as the output record consists of a 
control field made up of the customer number. Its length is 
7, which is the entry for columns 13-17. 

Column 8 

The A indicates that the control field is to be sorted in 
ascending order. 



Columns 29-32 

The control field is not to be dropped when writing the 
output file. The length of the output record is the control 
field (seven characters) added to the data fields specified 
by lines 08-14 (16), This totals 23 and is the entry for 
columns 29-32. 



Record Type Specifications 

Column 6 

The I identifies the record type line 01 as an include line. 
Input records described by this line are to be sorted. Since 
this is the only include set, all others are omitted. 

Column 7 

Line 01 is the first (and only) include line of this include 
set consisting of lines 01 and 07; therefore, column 7 must 
be blank. 



Field Specifications 

Column 6 

The F in column 6 of lines 07-14 indicates that the lines are 
field lines. 

Columns 7 and 8 

The NC in line 07 specifies that this is the control field to 
be sorted in the sequence specified in column 18 of the 
header line (ascending order) using both the zone and 
digit portions of the characters. 

Lines 08, 09, 11, and 1 2 are data summary overflow fields 
which are used here as data field unconditional 1 -character 
force fields. 

Line 10 indicates that this is a summary data field. When 
the data in the input record (positions 40-42) is used to 
build a work record, only the digit portion of the charac- 
ters is used. This is done since C0N1 is an unsigned deci- 
mal number. Using a D in column 8 with signed number 
causes the absolute value of that value to be used. 

Line 13 also is specified as a summary data field. However, 
U in column 8 indicates that this is signed unpacked decimal 
data. The sign is to be moved to the work record and used 
in subsequent summary additions. 

Line 14 is specified as the summary overflow indicator byte. 



Columns 9-16 

Entries are placed in the from and to columns for lines 07, 
10, and 13 to indicate the control field, digit summary 
data field (C0N1), and the signed unpacked decimal sum- 
mary field cost, respectively. 

For lines 08, 09, 11, and 12, the entries are blank since 
these are overflow indicator specifications. 



Column 17 

The X in line 14 defines the field as an overflow field. 
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Column 18 

This column is only used for lines 08, 09, 1 1, 12 and 14. 
The line numbers and the forced value in the data fields 
are: 



08 


bi (blank) 


09 


# 


11 


bi (blank) 


12 


$ 


14 


b (blank) 



The initial work record created from the ISSUE records will 
look like this: 



Positions 



Control field 



Data fields 



CUST 


\t> 


# 


CON 1 


16 


$ 


COST 


\k 




8 


9 




13 


14 




23 


1 7 


10 12 


15 22 



Since this is a summary sort, the C0N1 and COST fields 
will be summarized for records having identical control 
fields (CUST). These positions 10-12 (C0N1) in the work 
records will be summarized to reflect the total number of 
issues (TNUMB) for a given customer number. Likewise, 
positions 15-22 (COST) will be summarized to reflect the 
total cost of all issues (TCOST). 

The output record will look like this: 



CUST 


\b # 


TNUMB 


\l> $ 


TCOST 


/x 



Positions 



7 I 8 



9 I 10 



— *'T* H"* — 

12I13 14I15 



221 23 



A blank in position 23 indicates that TNUMB and TCOST 
are valid sums. X in position 23 indicates that overflow 
occurred summarizing TNUMB and/or TCOST for this 
customer number giving invalid sums. 
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SAMPLE JOB 7: NEGATIVE VALUES POSSIBLE 



Columns 13-17 



This samr:f- job illustrates the possibility of ending up 
with n(;c!a:iwi) values by sorting the summary history file 
by descending total dollars issued. 

The Input for this job is the output file created by Sample 
Job 6. Eech input record has the following format: 



Record 


Field 




Position 


Name 


Contents 


1-7 


CUST 


Customer number 


8-9 




Conslants: bi and # 


10-12 


TNUMB 


Total number of issues to customer 


13-14 




Constants: \i and S 


15-22 


TCOST 


Total cost of all issues to customer 


23 


OFLOW 


Overflow indicator; 

\/) - TNUMB and TCOST are 
valid sums 

X - Invalid sum; overflow 
occurred while summar 
izing TNUMB and/or 






TCOST 



Only reccrcs with valid TNUMB and TCOST will be used. 

A reco^c -,o't of the valid records is desired; that is, the for- 
mat of the output record is to be identical to the input (the 
output of iKe second summary sort sample job). 

The records are to be sorted by total dollars issued (TCOST) 
in descent iny order. It is possible that TCOST could be 
negative for some customer numbers. For this reason, a 
sort that co-i;siders the sign must occur. 



Header Soecifications 

Column 6 

The H id'MT'fies the line as a header line. 

Columns 7- 12 

The A recor j sort involving no summary data required a 
tag along sort. SORTR is the chosen entry. 



One type of record is specified to be included. The total 
length of the control fields for this type Is 8 (the entry in 
column 17). 



Column 18 

The D stands for descending oi der. The largest positive 
number comes first, the largest negative number (the 
negative number having the largest absolute value) comes 
last. 

The absolute values of - 19 and -99 are 19 and 99. -99 is 
more negative than -19 since its absolute value is greater 
than 19. 



Column 28 

The X indicates that the control field is to bo dropped 
when forming the output file. 



Columns 29-32 

When the control field is dropped, only the data portion 
remains. This data portion is the entire input record; thus, 
23 is entered in columns 29-32. 



Record Type Specifications 

Columns 6 and 7 

Two record types are specified: One type is to be omitted 
(O in column 6); one is to be included. Each record type is 
specified by one record type line. Since these lines are the 
first (as well as the last) record type lines in their sets, 
column 7 must be blank. 

Columns 8, 9-16, 1 7- 18, 19, and 20-39 

For statement 0101, these columns specify that if position 
23 in the input record contains the full character constant 
X, the record is to be omitted. 
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Statement 02 includes all records not omitted by statement 
01. For each record included, a vi/ork record is formed by 
the field specifications, statements 07 and 08. Note that 
the control field is an 8-position unpacked field (statement 
07). 

For a more complete discussion of numeric data see 
Column 8 and Columns 9-16 under Record Type 
Specified tions. 



Columns 7, 8, 9-16, and 18 

Statement 07 indicates unpacked data in the control field 
from positions 1 5 through 22 of the input record. (This 
control field is dropped because an X has been coded in 
column 28 of the header specifications.) 

Statement 08 indicates that the entire record is included as 
data. 



Field Specifications 

Column 6 

The F in column 6 of statements 07 and 08 indicates that 
these are field lines. 
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SAMPLE JOBS: MULTIPLE INPUT FILES 

This sample job illustrates the use of multiple input files 
by producing a 5-year history of sales of selected classes 
of items from selected vendors. 

The input is from the current year inventory file (multi- 
volume file) and from the inventory files for the past four 
years (single-volume files on four input devices). 



The records are selected by CLASS number 0126 and 
VENDOR numbers 00023, 00108, and 01 120. 

Output records contain information needed to identify 
which vendor's line of this CLASS has sold the best (num- 
ber of transactions and number of units) per year for the 
current year and the past four years. The mformation is in 
the following fields: ITEM, CLASS, VEND1, TRANS, 
TDATE, ISSUES. 



The record format for all files is the same as that used for 
the inventory files. 



Output records are to be sorted m ascending order by year 
(last two positions of TDATE field), then by VENDOR 
number (VEND1 field, and finally by ITEM number (ITEM 
field). 



OCL required for the program is given in the following 
figure. 
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Header Specifications 

Column 6 

The H identifies the line as a header line. 

Columns 7- 12 

SORTR identifies the job as a tag along sort. 



Columns 13-17 

The control fields used to sort records in this job are the 
last two positions of the TDATE field, and VEND1 and 
ITEM. The total of their lengths is 13, which is the entry 
for colunnns 13-17. 



Record Type Specifications 

Column 6 

The I identifies the line as an include line. The input 
records that match the specifications of these lines are 
included. All other records are omitted. 

Column 7 

The A identifies the line as an AND statement while O 
identifies the line as an OR statement. The sequence of 
the lines is important in determining the include logic. 
The logic shown includes three types of input records, 
each type being included only if the two AND include 
requirements are met. 



Column 18 

The A stands for ascending order. Output records are to be 
sorted in ascending order by YEAR, VENDOR number, 
and ITEM number. 



Columns 29-32 

The output records contain six fields, including the three 
control fields. Control fields are not being dropped (col- 
umn 28 blank). The output length is the total length (26) 
of all six fields described in field specifications. 



Column 8 

The D means that the digit portions of the characters in 
positions 7-10 and 87-91 of the records (factor 1) is 
compared with the digit portion of the constants (factor 2). 
Leading blanks in positions 7-1 would be treated like 
zeros. 

Columns 9- 16. 17- 18, and 20-39 

Inventory records that indicate the activity of stock CLASS 
equal to the constant 0126 and vendor (VEND1 field) equal 
to the constants 00023, 001 1 8, and 01 1 20 are to be 
selected. 



Column Wand 20-39 

The C in column 19 indicates that factor 1 is compared to a 
constant in columns 20-39. 
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Field Specifications 

Column 6 

The F in column 6 of lines 7-12 indicates that the lines are 
field specification lines. 



Column 7 

Indicates the type of fields being described. The fields 
described in lines 07, 08, and 09 (TDATE, VEND1, and 
ITEM) are control fields. N specifies they are normal con- 
trol fields so that output records will be sorted in the order 
indicated in column 18 of the header specifications. 

The fields described in lines 10-12 are data fields. The 
form of the output record is as follows: 



TDATE VEND1 



ITEM 



CLASS 



TRANS 



ISSUES 



Positions 



13 14— -^17 18-^-^20 21-<-<^26 



Column 8 

The C defines both the zone and digit portion of the input 
record used. 

Statement 09 defines only the digit portion of the input 
record used. 



Columns 9- 16 

Identifies the location of the fields in the input record. 
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SAMPLE JOB 9; RECORD SELECTION OIM BINARY 
VALUES 

Data selection on a binary value can be accon.plished usmy 
the System/3 96-column card, 64 characi(;r set. Two types 
of include sequences can be u^.jd to a..conip=!.'li binary 
selection. 



Type 1 Include Sequence 

For binary values whose hoxadocmial equivalents can be 
represented by one or two characters in the 64 cnaracter 
set (see Appendix C, Collating Sequence) jse cipher an 
include character (I and C in columns 6 and 8 ot the record 
type specifications) or an include pone {\ and Z in columns 
6 and 8 of the record ty[je specifications )ANDed with an 
include digit (IAD in columns 6 through 8 o1 The record 
type specifications). 



Type 2 Include Sequence 

For binary values whose hexadecima; zone portions do not 
appear in the 64-character set, u-,e two include 
specifications for the /one portion ANDed with an include 
digit for the digit portion. 

Example: Select records tliat '.0111311! a value of 44 in 
position 2. The binary representation ot this nuiriber is 
0010 1 100, which is a hex 2C, Foi tPie digit !-iortion, 
select a character from the table in Appendix C with a 
digit portion of C (for example, ■ , *, %, and @). Uoe 
the character in an include line, coiTiparing its digit poition 
to the binary value of 1 100 Since there is no cnaracter 
in the 64-character set whose zone portion is equivalent 
to 2, use two include lines to descnPe constants with d 
zone portion greater than 1 and less than <j> eijuai to 2. 
Describe these constants as packed, which tevei;,es the zone 
and digit portions from hex ¥ ] and F2 <o hex IF and 2F. 
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Record Typu 




: 










- '[ 


L ! 
,, 1 

! f 
* 


- 


1 

-■■ , . 1 1 

1 


'',:'< 




... 






If 


, , , 




^Mp t //ex IF 

1 1 ' ! 

■ " ' ■ ■ 1 : " ■ ■ 

1 ■ . ; ' 

' 1 : ' ' , ■ i ' ' 1 


. j i . j - j 1 t 

. . . . , . i . f 

: : ■ ■ r i ' r "" 

' . ' 1 . : j ! 
1 ... < :. ' 1 i i 





Hexadecimal 


Binary 


Decimal 




Value 


Value 


Value 


Field to l)e seJcctud 


2C 


0010 1100 = 


44 


Character 'ii> 


7C 


-= 01111100 - 


124 


Packt'il churacter 2 


2F 


- 0010 1111 - 


47 


Pdckt.-(i cliaracti^r 1 


u- 


0001 1111 


31 



The record type specifications shown will cause selection of 
all records containing (in column 2) a value between 31 
(hex 1 F) and 47 (hex 2F) whose digit portion is equal to C. 

Note: The 32 hexadecimal values whose zone portions 
are either A or B cannot be accessed with these types of 
entries. Therefore, there can be no record selection t^iased 
on these values. 



Sample Sort Job 9 Description 

The purpose of this sample job is to select records from an 
inventory file whose reorder point is 7800. The reorder 
point is a 2-byte quantity in columns 44 and 45 of the 
inventory records. The quantity is stored in binary 
(7800 = 0001 1 110 01 1 1 1000), and the hexadecimal 
representation of this number is 1 E78. (Use Appendix C 
to help with binary and hexadecimal conversions.) 
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SEQUENCE SPhCIFICATIOIMS , , \ , , , . V", 

HfiaHpr ^^■; . ; : i. : ■ ■ . i : i j 


lu. 




F 




~^ 










1 — ''""■"■■ 




_ 
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1 














"1" ° 





^ ORTIZ 


_.__^jk 


A 


u 


, 1 






1 






._J 


J 


— 1 


Hi 


■ , . ■ ' , y 






lAZ 



d 
p 
p 









Record Type 



DIGIT - 1^£" 
/5A/D <j= 'M F' 

KXf >4A/i) 't-y-je 
P i6ir = 1-8/ 






Field 



Nurnbev < 










c 




^ — — _ — 1 

1 

■ , i 1 

1 

1 


0', ,^ 

14' f 


(C ( 
'0 , 7 


1,11 

1 ! 


1 i ■ ■ : 


1 ■ ■ ■ ... ■ ! . ■ 
. , 1 1 . . . 

1 

■ ■ ■ ■ 1 

... 1 

1 

1 • • ■ 

. . 1 







Hexadecimal 


Binary 


Decimal 






Value 


Value 


Value 


F leld lo be selected. 


column 44 


IE 


0001 1110 


30 


Chai acter + 




4E 


0100 1110 


78 


Packed character 1 




1 F 


0001 nil 


31 


Packed character 




OF 


0000 1 1 1 1 - 


15 


Field to be selected, 


column 45 


78 


0111 1000 




Chai acter (9> 




7C 


0111 1100 




Characti.'r 8 




F8 


nil 1000 
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SEQUENCE SPECIFICATIONS , , 'i ,. r'^'^' t 'V V™ 
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-J 
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7/f 
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PC 






Record Type 



' 




■■ (1 






'./::r 




- 







1 

1 
1 


1 

I( 

HI 




M . 
•• »# 

IZ 










i 1 ■ ■ ■ 

, , 1 , ,. ,11, 


ANP /■,- IMF' : i f<r« rr^f£| ^r^ : , ; , , :., 



Field 




wm^umfWmm^'^ 
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These specifications will cause selection of all records 
containing (in column 44) a value between 15 (hex OF) 
and 31 (hex 1 F) whose digit portion is equal to E. These 
specifications will further limit selection of records to 
those which have a binary value in column 45 whose 
zone portion equals 7 and whose digit portion equals 8. 
Therefore, all records selected will have hex 1 E78 in 
columns 44 and 45. 



Header Specification 



Record Type Specifications 

Line 01 selects records whose digit portion in column 44 
is E. Lines 02 and 03 select records whose packed value in 
column 44 is less than or equal to hex 1 F, and at the same 
time is greater than a packed value of hex OF. 

The only hexadecimal values that satisfy both specifications 
for lines 02 and 03 are hex 1 1 through hex IF. Line 04 
is a comment line. Lines 05 and 06 select records whose 
zone portion in column 45 is 7 and whose digit portion is 8. 



Column 6 

The H identifies the line as a header line. 

Columns 7-12 

SORTR identifies the job as a tagalong sort. 

Columns 13-17 

The total length of the control field is 6 bytes. 

Column 18 

The A stands for ascending order. The file will be sorted 
according to the standard collating sequence shown in 
Appendix C. 



Field Specifications 

Column 6 

The F identifies the lines as field specification lines. 



Columns 7, 8, and 9-16 

Line 07 indicates that the control field is in positions 1 
through 6 of the input records. Only the digit portions of 
the characters will be used. This control field will be 
included in the output file. 

Line 08 indicates that the other 105 input record characters 
are included as data in the output file. 



Columns 29-32 

The control field is not dropped when data is written to 
the output file (column 28 is blank). Therefore, the 
length of the output record equals the length of the control 
field (6 bytes) plus the length of the data field (105 
characters) specified by lines 07 and 08. This output 
record length totals 111, which is the entry for columns 
29 through 32. 
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Chapter 7. Integer (Binary) and Real Number Sorting 



SAMPLE JOB 1: SORTING ON A CONTROL FIELD 
THAT CONTAINS EITHER A POSITIVE INTEGER OR 
A POSITIVE REAL NUMBER 



IBM 



SEQUENCE SPECIFICATIONS 
Header 



T^ 



m 
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/ 1 
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1 1 
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■ 1 
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Header Specification 

Column 6 

The H identifies tiie line as a header line. 

Columns 7-12 

SORTR identifies the job as a tagalong sort. 

Columns 13 17 

The control field that contains either a positive integer or a 
positive real number has a length of 4 bytes (the entry in 
column 17). 

Column 18 

The A specifies ascending order. The smallest positive 
integer or positive real number comes first; the largest 
positive integer or positive real number comes last in the 
sort sequence. 

Columns 29-32 

Tiie control field is not dropped when data is written to 
the output file (column 28 is blank). Therefore, the length 
of the output record equals the length of the control field 
(4 bytes) added to the length of the data field (60 
characters) specified by lines 07 and 08. This output 
record length totals 64, which is the entry for columns 29 
through 32. 



Record Type Specifications 

Because all input records are being used and all have the 
same field specifications, no record type specifications 
are needed (include-all is implied). 



Field Specifications 

Column 6 

The F identifies the lines as field specification lines. 

Columns 7 , 8, and 9-16 

Line 07 indicates that the control field is in positions 1 
through 4 of the input record. This control field is 
included in the sorted output file (column 28 of the header 
line is blank). 
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SAMPLE JOB 2: SORTING ON A CONTROL FIELD 
THAT CONTAINS ONLY A POSITIVE OR NEGATIVE 
INTEGER 



IBM 



SEQUENCE SPECIFICATIONS 
Header 



K,.,..^a 



issznz^ 



klZM 



Record Type 



X 



C 



Ft 



Lf 



4 



WJTWsjWWWjW^, 



Field 
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Field 
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Header Specification 

Column 6 

The H identifies the line as a header line. 



Column 18 

The A stands for ascending order. Since negative integers 
are stored in two's connplement form, the smallest 
negative integer comes first; the largest positive integer 
comes last in the sort sequence (for example, -2, -1,0, 1, 2). 



Columns 7-12 

SORTR identifies the job as a tagalong sort. 

Columns 13-17 

The total length of the control field (for either a positive 
or a negative integer) is 5 bytes (the entry in column 17). 



Column 28 

The X indicates that the control field is dropped when data 
is written to the output file. 



Columns 29-32 

When the control field is dropped, only the data portion 
remains. The data portion in this sample job is the entire 
input record. Therefore, 64 is entered in columns 29 
through 32. 
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Record Type Specifications 



Field Specifications 



Column 6 

Two record types are specified (positive integers and 
negative integers). BotPi record types are to be included 
(I in colunnn 6 of line 01, pages 01 and 02). 



Column 6 

The F identifies the lines on pages 01 and 02 as field 
specification lines. 



Columns 8,9-16, 17-18, 19, and 20-39 

On line 01 (page 01 ), these columns specify that if position 
1 (the leftmost byte of the 4-byte control field from the 
input record) is less than or equal to the character 
constant " (see note), the work record will have a 
character 2 forced into the first byte of its 5-byte control 
field (line 07 on page 01). This include line selects only 
positive integers. Line 01 (page 02), which is an include-all 
line, indicates that all records not described by the first 
include line (page 01) are also included in the sort. The 
first include line (line 01 on page 01) selects all positive 
integers, therefore, this include-all line (page 2) selects 
all negative integers, which will have a character 1 forced 
into the first byte of their work record control field (line 
07 on page 02). All negative integers are forced in front 
of all positive integers in the sort sequence. 

Note. The special character " has a bit configuration of 
01111111, which is equivalent to the high order byte of 
the maximum positive integer. 



Columns 7, 8, 9-16, and 18 

On line 07 (pages 01 and 02), these columns specify that 
for positive integers (line 07 on page 01), a character 2 
will be forced into the first byte of the work record control 
field; for negative integers (line 07 on page 02), a character 
1 will be forced into the first byte of the work record 
control field. 

On line 08 and 02, columns 7, 8, and 9 through 16 specify 
that the control field is in positions 1 through 4 of the 
input records. (The control field is not included in the 
output records because header specification column 28, 
page 01 , contains an X.) 
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SAMPLE JOB 3: SORTING ON A CONTROL FIELD 
THAT CONTAINS ONLY A POSITIVE OR NEGATIVE 
REALIVUMBER 



IBM 
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SEQUENCE SPECIFICATIONS 
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Record Type 
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88 















Record Type 


1,,.. 


.,„,,„ 1 






<,,„,„„.,„■, 


N'.ii-l.rr ■; 


- 


^ ,v, .,..-.,.,., .- 


Lo...!<i.ir •■ 


1 

1 
1 


'; i| '"'■ 


T,. 


J 1 :i. 


,,. 




'■[' ^ 


■ 








! . 1 


■ ■ ;}•■■-■■■ 


"iftrcH-AiX Fo/z fV;flS|. /e^f46 fjpf4s^f[ , 


i 1 


1 ■ ■ 


' , , 1 , , ! : : 


' ^ ! : i , : , : , : 1 ■ 1 : . ! : iii 

; ' 1 ' ' i , 1 . , 1 ■ ; 1 ' , 



Field 



..:,, C 






1 


-_-— - 1 


- 


J ' 


— — — — — 1 
1 

t ...I 1 
1 
1 


■1. 

■'':' ' z 

' • ' ' i 
■ 1 


t 
PC 


■ '4 


i i , ' ! 




! 1 : 1 . ■ 1 


. 1 ■ i , 1 ; ; : 




1 

1 • ' ■ ■ : ' ■ ; ■ ; : 1 1 

1 ■ : '. 1 ; 1 ■ ■ ■ j 1 M 1 1 

1 i . 1 , 1 .,..:,.. ,- 

. 1 ^__. i . ^ L^J ' ' ■ i i 1 1 



Header Specification 

Column 6 

The H identifies the line as a header line. 



Column 18 

The A stands for ascending order. The smallest negative 
real number comes first, the largest positive real number 
comes last in the sort sequence (for example -2.0, -1 .0, 
0.0, 1.0,2.0). 



Columns 7-12 

SORTR identifies the job as a tagalong sort. 



Column 28 

The X indicates that the control field is dropped when data 
is written to the output file. 



Columns 13-17 

The total length of the control field (for either a positive 
or negative real number) is 5 bytes (the entry in column 17). 



Columns 29-32 

When the control field is dropped, only the data portion 
remains. The data portion in this sample job is the entire 
input record. Therefore, 64 is entered in columns 29 
through 32. 
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Record Type Specifications 



Field Specifications 



Column 6 

Two record types are specified (positive real numbers and 
negative real numbers). Both types are to be included 
(I in column 6 of line 01, pages 01 and 02). 



Column 6 

The F identifies the lines on pages 01 and 02 as field 
specification lines. 



Columns 8, 9-16, 17-18, 19, and 20-39 

On line 01 (page 01 ), these columns specify that if position 

1 (the leftmost byte of the 4-byte control field from the 
input record) is less than or equal to the character 
constant " (see note), the work record will have a character 

2 forced into the first byte of its 5-byte control field (line 
07 on page 01 ). This include line selects only positive 
real numbers. Line 01 (page 02), which is an include-all 
line, indicates that all records not described by the first 
include line (page 01) are also included in the sort. The 
first include line (line 01 on page 01) selects all positive 
real numbers; therefore, this include-all line (page 02) 
selects all negative real numbers, which will have a 
character 1 forced into the first byte of their work record 
control field (line 07 on page 02). All negative real 
numbers are forced in front of all positive real numbers 

in the sort sequence. 

Note: The special character " has a bit configuration of 
01111111, which is equivalent to the high order byte of 
the maximum positive real number. 



Columns 7, 8, 9-16, and 18 

On line 07 (pages 01 and 02), these columns specify that 
for positive real numbers (line 07 on page 01), a character 2 
will be forced into the first byte of the work record control 
field, for negative real numbers (line 07 on page 02) a 
character 1 will be forced into the first byte of the work 
record control field. 

On line 08 (pages 01 and 02), columns 7, 8, and 9 through 
16 specify that the control field is in positions 1 through 4 
of the input records. Note that real numbers are always 
carried in true form (never in two's complement form). 
Therefore, sorting negative real numbers into ascending 
sequence requires them (when treated as character fields) 
to be sorted into descending sequence. 

On line 09 (pages 01 and 02), columns 7, 8, and 9 through 
16 specify that 64 input record characters are included as 
data in the sorted output file. 
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Appendix A. Conversational OCL for Model 6 



The OCL cycle you use depends on the type of sort you 
want to do: 



Type of Sort 


Cycle To Use 


What The Cycle Does 


Sort job you plan 


LOAD 


Gives the system the OCL 


to run only a few 




statements it needs to run 


times 




the sort job. 




BUILD 


Stores the OCL statements 
necessary to run the sort 


Sort job you plan 




job in a source library.' 


CALL 


Tells the system you want 


to run frequently 




to use a procedure' to run 
a sort job. 




BUILD 


Stores the OCL statements 
necessary to run the sort 


Sort job you plan 




job in a source library.' 


BUILDC 


Puts the name of each job 


to run as one of 




in the group and the disk 


a group of jobs 




location of the OCL state- 
ments for each job in a 






source library.' 


CALL 


Tells the system you want 






to use the BUILDC proce- 






dure' to run a group of 






jobs. 


'A set of OCL Stat 


3ments in a source 1 


brary is called a procedure. 



Note: See Appendix H for CCP/Disk Sort oriented file 
and program considerations. 



CODING OCL CYCLES 

This appendix contains keyword-response summary charts 
for the LOAD, BUILD, and CALL cycles. For the keyword- 
response summary for the BUILDC cycle, see the IBM 
System/3 Model 6 Operation Control Language and Disk 
Utility Programs Reference Manual, GC21 -751 6. 

• Words or letters in all capital letters (such as INPUT, 
INCLUDE, R1 ) are entries the operator must make. 

• Words or letters not in all capital letters (such as proce- 
dure name, mmddyy) represent information you must 
supply. 

• P/S indicates the program start (PROG START) key. 

• ENTER- indicates the ENTER - key. 

For more information about any particular statement (key- 
word and response), see the keyword description section of 
the IBM System/3 Model 6 Operation Control Language 
and Disk Utility Programs Reference Manual, GC21 -751 6. 



THE MODIFY STATEMENT 

The only responses shown on the following charts are those 
that apply directly to the disk sort program. For other 
MODI FY options (such as correcting one of the statements 
in a cycle) see the keyword description section of the IBM 
System /3 Model 6 Operation Control Language and Disk 
Utility Programs Reference Manual, GC21 -751 6. 
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THE LOAD CYCLE 



Input file 



Prompt 


Response 






-j— _ — 

Considerations 


READY 


LOAD 
(P/S) 






- 


LOAD NAME 


SDSORT 

(P/S) 






System name for the disk sort program 


UNIT 


R1, R2. F1 
(P/S) 


or 


F2 


Disk that the disk sort program is on 


DATE 


mnnddyy or 
(P/S) 

or 

(P/S) 


dd 


mmyy 


If you want a different system date for 
your job 

If you want to use the system date for 
your job or no date is required 


SWITCH 


(P/S) 






Disk sort does not use external indicators 


FILE NAME 


INPUT 
(P/S) 






Name that disk sort uses for file you want 
to sort 


UNIT 


R1, R2, F1, 

(P/S) 


or 


F2 


Which disk the file you want to sort is on 


PACK 


Disk name 
(P/S) 






Name of disk which contains the file to 
be sorted 


LABEL 


VTOC filename 
(ENTER-) 




Name you use for the file you want to 
sort (PAYROLL, INVENT, etc.) 


FILE NAME 


WORK (opt 
(P/S) 


onal) 


Name disk sort uses to refer to file you are 
going to use for work area during this sort. 
If WORK IS not used, disk sort performs 
automatic work file allocation. 


UNIT 


Rl, R2, F1, 

(P/S) 


or 


F2 


Disk containing the file you are going to 
use for a work area 


PACK 


Disk name 
(P/S) 






Name of disk which contains the work file 


LABEL 


(P/S) 






- 
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THE LOAD CYCLE (continued) 



Work file 



Output lile 



Prompt 


Response 


Considerations 


RECORDS 


(P/S) 


Do not specify RECORDS for tlie work 
file 


TRACKS 


1-398 


Number of tracks file occupies (see 




(P/S) 


Appendix E) 


LOCATION 


8-405 


If you want to control the location of the 




(P/S) 


file on the disk 




or 






(P/S) 


If you want to let disk sort control the 
location of the file on the disk 


RETAIN 


S 


Scratch status because the work file is 




(ENTER-) 


used for only one sort job 


FILE NAME 


OUTPUT 


Name disk sort uses for the sorted file 




(P/S) 




UNIT 


R1, R2, F1,or F2 


The disk you want to put the sorted file 




(P/S) 


on 


PACK 


Disk name 


Name of the disk which will contain the 




(P/S) 


sorted file 


LABEL 


VTOC filename 


Name you use tor th.^ s^.u-.,! -,]<■■ \^'-,-<i 




(P/S) 


can be thu -Miiiie a: your r<dn^^ for tiie 
file you want to sort) 


RECORDS 


1-999999 


Number of rpcords vou want to sort 


(see note) 


(P/S) 




TRACKS 


1-398 


Number of tracks file occupies (see 


(see note) 


(P/S) 


Appendix E) 


LOCATION 


8-405 


If you want to control the location of 




(P/S) 


the file on the disk (if you are overlay- 
ing an input file with an output file you 




or 


must specify LOCATION) 




(P/S) 


If you want to let disk sort control the 
location of the file on the disk 


RETAIN 


PorT 


If the output file is built during the sort 




(P/S) 


job, It can have permanent (P) or tempor- 
ary (T) status. If the output file existed 
be-fore vol ftaitr-d the sort jola, the t,!r. 
cannot have per manont status since vou 
ca'^nct oi'priav a pern^a^ent file. 



Note: These are the space keywords. If you are creating a new output file you must respond 

to one of them. 
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THE LOAD CYCLE (continued) 



If you are going 
to enter sequence 
specifications 
from the key- 
board 



If the sequence 
specifications are in 
a KSE-created source 
library entry 



Prompt 


Response 


1 
Considerations 


FILENAME 


(P/S) 


Dis 


< sort uses only three files 


MODIFY 


RUN 


Tel 


s disk sort that the OCL statements 




(P/S) 


are 


complete. 




1. Sequence 


1. 


Operator is going to enter the 




specifications 




sequence specifications from the 




2. //END 




keyboard (one specification per 
line). 






2. 


Sequence specifications are com- 
plete. 






3. 


Disk sort program sorts your file. 




//SOURCE name, unit 


1. 


name = name of the KSE-created 
source library entry which contains 
the set of sequence specifications 
you want to use. 

unit = the disk (R1, R2, F1, or F2) 
whose source library contains the 
sequence specifications you want 
to use. 






2. 


When all these sequence specifica- 
tions have been read, the disk sort 
program sorts your file. 
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Input file 



Prompt 


Response 


Considerations 


READY 


BUILD 
(P/S) 






- 


BUILD NAME 


Procedure name 
(P/S) 


The name you want to give the procedure: 

• Maximum of six alphameric characters 

• Must begin with alphabetic character 

• Must not be DIR, SYSTEM, or ALL 


UNIT 


R1, R2, F1, 

(P/S) 


or 


F2 


The disk containing the source library you 
want to put the procedure in 


LOAD NAME 


SDSORT 
(P/S) 






System name for the disk sort program 


UNIT 


R1, R2, F1, 

(P/S) 


or 


F2 


Disk that the disk sort program is on 


DATE 


ddmmyy or 
(P/S) 

or 

(P/S) 


mmddyy 


If you want a different system date for 
your job 

If you want to use the system date for 
your job or no date is required 


SWITCH 


(P/S) 






Disk sort does not use external indicators 


FILE NAME 


INPUT 
(P/S) 






Name that disk sort uses for file you want 
to sort 


UNIT 


R1, R2, F1 

(P/S) 


or 


F2 


Disk the file you want to sort is on 


PACK 


Disk name 
(P/S) 






Name of disk that contains the file to be 
sorted 


LABEL 


VTOC filename 
(ENTER-) 


Name you use for file you want to sort 
(PAYROLL, INVENT, etc.) 
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THE BUILD CYCLE (continued) 



Work file 





Prompt 


Response 


Considerations 


/ 


FILE NAME 


WORK (optional) 
(P/S) 


Name disk sort uses to refer to file you 
are going to use for work area during 
this sort. If WORK is not used, disk 
sort performs automatic work file 
allocation. 




UNIT 


R1, R2, F1 
(P/S) 


or F2 


Which disk the file >r„i aie :,o;nq tc uv 
for work ared !■-; on 




PACK 


Disk name 
(P/S) 




Name of disk that vvc k file s >..ri 




LABEL 


(P/S) 




- 




RECORDS 


(P/S) 




- 




TRACKS 


1-398 
(P/S) 




Number of tracks file occupies (see 
Appendix E) 




LOCATION 


8-405 
(P/S) 

or 

(P/S) 




If you want to control the location of 
the file on the disk 

If you want to let disk sort control the 
location of the file on the disk 


\ 


RETAIN 


S 

(ENTER-) 




Scratch status because the work file is 
used for oniy one sort job 
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Output file 



Prompt 


Response 


Considerations 


FILE NAME 


OUTPUT 


Name that disk sort uses for file area 




(P/S) 


where you want to put the sorted file 


UNIT 


R1, R2, Fl.or F2 


Disk you want to put the sorted file on 


PACK 


Disk name 


Name of disk which will contain the 




(P/S) 


sorted file 


LABEL 


VTOC filename 


Name you use for the sorted file (this 




(P/S) 


can be the same as your name for the 
file you want to sort) 


RECORDS 


1-999999 


Number of records you want to sort 


(see note) 


(P/S) 




TRACKS 


1-398 


Number of tracks file occupies (see 


(see note) 


(P/S) 


Appendix E) 


LOCATION 


8-405 


If you want to control the location of 




(P/S) 


the file on the disk 




(P/S) 


If you want to let disk sort control the 
location of the file on the disk 


RETAIN 


PorT 


If the output file is built during the sort 




(ENTER-) 


job, it can have permanent (P) or tempor- 
ary (T) status. If the output file existed 
before you started the sorted job, the file 
cannot have permanent status since you 
cannot overlay a permanent file 



Note: These are the space keywords. If you are creating a new output file you must respond 
to one of them. 
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THE BUILD CYCLE (continued) 



You are going to 
include sequence 
specifications in 
the procedure 



You are going to 
put a pointer to 
the sequence 
specifications in 
the procedure 



You are not 
putting sequence 
specifications in 
the-procedure 



Prompt 


Response 


Considerations 


FILE NAME 


(P/S) 




Disk sort uses only three files 


IVIODIFY 


1. 


INCLUDE 


1. Tells the system you are going to 




2. 


Sequence 


include sequence specifications in 






specifications 


the procedure 




3. 


//END 


2. Operator types the specifications 
(one specification per line) 

3. Tells the system the sequence 
specifications are complete 


IVIODIFY 


RUN 




System gives operator opportunity to 




(P/S) 




correct any mistakes in sequence specifi- 
cations. Operator types RUN when sure 
all the specifications are correct. System 
stores the procedure in the source library 
you specified in the second OCL state- 
ment. 


IVIODIFY 


1. 


INCLUDE 


1. Tells the system you are going to 




2. 


//SOURCE name, 


include in the procedure a pointer 






unit 


to the sequence specifications 
2. name = name of the KSE-created 
source library entry which contains 
the set of sequence specifications 
you want to include in the proce- 
dure 

unit = the disk (R1, R2, F1,or F2) 
whose source library contains the 
set of sequence specifications you 
want to include in the procedure 


MODIFY 


RUN 




You are not going to include sequence 




(P/S) 




specifications in the procedure. The 
system stores the procedure in the 
source library you specified in the 
second OCL statement. 
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THE CALL CYCLE 



If sequence 
specifications 
are included in 
the procedure 



If sequence 
specifications are 
not in the proce- 
dure and you want 
to enter them 
through the 
keyboard 

If sequence 
specifications are 
not in the procedure ' 
but are in a KSE- 
created source 
library entry 



Prompt 


Response 


Considerations 


RtEADY 


CALL 
(P/S) 




CALL NAME 


Procedure name 


Your response to BUILD NAME during 




(P/S) 


the BUILD sequence 


UNIT 


Rl, R2, F1,or F2 


Disk where the procedure is located; sys- 




(P/S) 


tem displays the procedure 


MODIFY 


RUN 


Tells the system the OCL statements are 




(P/S) 


correct 


INCLUDED 


No response 


System prints sequence specifications 


STATEMENTS 






MODIFY 


RUN 


Tells the system the sequence specifica- 




(P/S) 


tions are correct; system runs the sort 
job 


MESSAGE SD100 


1. Sequence 


1 . Operator types sequence specifica- 


ASKING FOR 


specifications 


tions on the keyboard (one specifi- 


SEQUENCE 


2. //END 


cation per line) 


SPECIFICATIONS 




2. Tells the system the sequence 
specifications have been entered 


MESSAGE SD100 


//SOURCE name, unit 


name = name of the KSE-created source 


ASKING FOR 




library entry which contains the sequence 


SEQUENCE 




specifications you want to use. 


SPECIFICATIONS 




unit = location of disk whose source 
library entry you want to use (Rl, R2, 
F1,or F2) 

When the system has read all the sequence 
specifications, it runs the sort job 
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ADVANTAGES 

+ 



WAY TO SUPPLY SEQUENCE 
SPECIFICATIONS FOR 
MODEL 6 



Most d I reel 



OCL Input Device 

Keyboard—if you are 

using conversational 

OCL 

Data Recorder— if 

you are using card 

OCL (not CCP/Disk Sort) 



Conversational 
OCL only 



DISADVANTAGES 



You must provide the entire set of 
sequence specifications each time 
you want to run the sort program. 

Operator can correct typing mistakes 
only in the current specification. The 
operator cannot correct a previous 
specification or insert an overlooked 
specification. 



;!1 HfcUji;- 



in a .^pecjii .^.cH.oi c diiy^riere 
in the sequence. 



Part of OCL Procedure 



Conversational 
OCL only 



Operator cannot insert a new specification 
into the sequence. 



KSE checks each sequence speci- 
ification for format accuracy be- 
fore putting it in source library. 
As a result, there are no error 
halts because of format errors in 
the sequence specifications. 

Saves time in frequently run sort 
jobs. 



Source Library Entry 
Created by KSE 



Requires two KSE program runs: 

1 . To put the format descriptions of the 
sequence specifications in a source 
library. 

2. To put the sequence specifications 
themselves in a source library. 



TOO 



INTERRELATIONSHIP OF CONVERSATIONAL OCL 
AND SEQUENCE SPECIFICATIONS (MODEL 6) 

The following chart shows the skeleton of the OCL LOAD 
and CALL cycles: the first two keywords and any other 
keywords that are of special significance in the interrelation- 
ship of the OCL and the sequence specifications. The rest 
of the keywords (indicated by arrows) follow the normal 
sequence for that cycle. (Appendix A contains the key- 
word-response summaries for each of the three cycles.) 

The gray areas in each box show where the sequence 
specifications fit into the OCL cycle. 



Operator will type 
sequence specifica- 
tions on the key- 
board (one state- 
ment per line). 



Sequence specifications 
are in a KSE-created 
source library entry. To 
use the specifications, 
enter a SOURCE state- 
ment to give the system 
the name of the KSE entry 
and its disk location. 



Sequence specifications 
have been included m a 
procedure— along with 
the OCL statements for 
the job. To use the 
specifications, enter 
CALL NAME and UNIT 
statements to give the 
system the name of the 
procedure and its disk 
location. 



READY 
LOAD NAME 



Supplying Sequence Specifications 
OCL Load Cycle OCL Call Cycle 

-CALL 



- LOAD 
-$DSORT 



READY 
CALL NAME 



-/pi 



procedureV. 
ame y- 



To build the procedure 
use a BUILD cycle 



:|Message asking for sequence! I Message asking for sequence si 

|sj3ecifications 111111111111111 p specifications li|l||||;;|||;iiliii 

i Sequence specifications |i:|| JSequence specifications 1111111 

|// ENDiliiiiiliiiiiiiiiil ta end v&§BMSml9mB, 



READY -BUILD 

BUILD NAME - procedure 
name 



READY 
LOAD NAME 



■ LOAD 
SDSORT 



MODI FY _^ -RUN 

liviessage asking for 1111 
Isequence specif ications||i;| 

|//s6uRCE'narne7uniT|||| 
iistatement illliilillilili 



READY 
CALL NAME 



MODIFY 



- CALL 



- RUN 



iMessage asking for |||| 

i// SOURCE name, unit |||| 
Istatement 



READY 
CALL NAME 



UNIT 



MODIFY 



CALL 



disk location 



MODIFY 



RUN 



To build the procedure 
use a BUILD cycle 



READY 
BUILD NAME 



RUN 



System prints out the 
sequence specifications or 
la // SOURCE statement 



- BUILD 

— procedure 
name 



MODIFY 



RUN 



I Sequence specifications 

'/ end| 
RyNJIII 

MODIFY - RUN 
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SUPPLYIPJG OCL STATEMENTS AND SEQUENCE 
SPECIFICATIONS FOR THE MODEL 10, THE 
MODEL 12, AND THE MODEL 15 



OCL from system input device 
Sequence specifications from system 
input device 




OOOOOHSORTA 
(header specification) 



// RUN 



/ // FILE NAME-OUTPUT, 
. . . (file description) 



Opti 



onal < 



// FILE NAME-WORK 
. . . (file description) 



// FILE NAME-INPUT 
(or INPUT1-8for Model 12 
and Model 15), 

. . . (file description) 

/ // LOADSDSORT, unit 



OCL from procedure section of 

source library 
Sequence specifications from procedure 

section of source library 



I Any nur 



1/ 



jmber of 
field and record 
type specifications 



z 



// RUN 



/ // CALLna 



Z 



z 



// END 



// CEND 



Placing FILE state- 
ments between the 
CALL and RUN - 
statements will over- 
ride the Fl LE state- 
ments in the OCL 
procedure. Sort 
specification cannot 
be overridden. 



M 



(OCL and sequence 
specifications) 



z 



//COPY FROM-READER, 
LIBRARY-P, NAME-name, 



TO-unit, RETAIN 



\ll 



// RUN 



// LOAD$MAINT, unit 



[y 
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OCL from system input device 
Sequence specifications accessed from 
source library by SOURCE statement 



: Optional 



/ 



// SOURCE name, unit 



// RUN 



// FILE NAME'OUTPUT, 
. . (file description) 



// FILE NAME-WORK, 
. . . (file description) 



' // FILE NAME-INPUT 
(or INPUT 1-8 for Model 12 
and Model 15). 
. . . (file description) 



// LOAD SDSORT, unit 



See note 




/ // END 
j/ //CEND 



sequence 
specifications) 



///COPY FROM-READER, 
LIBRARY-S, NAME-name, 



L 



TO-unit, RETAIN 



M 



II RUN 



A7 



OAD SMAINT, unit 



V 



Note: name indicates the 
source library member name 
containing sort sequence 
specifications; unit indi- 
cates the unit identification 
on which the source library 
resides. 



OCL from procedure section of source 

library 
Sequence specifications accessed from 

source library by SOURCE statement' 



m 



END 



// CEND 



(sequence 
specifications) 



z 



L 



II SOURCE name, unit 



// RUN 



// CALL name, unit 



See note 



II COPY FROM-READER, 
LIBRARY-S NAME-name, 



TO-unit, RETAIN- 



^P\ 



zz 



// CEND 



(OCL) 



/ 



// COPY FROM- 
READER, LIBRARY-P, 
NAME-name, TO-unit, 



RETAIN- 



// RUN 



// LOAD SMAINT, unit 



The SOURCE statement can 
come from the system input de- 
vice, or it can reside in the pro- 
cedure conlaining the OCL. 



K 



V 
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OCL from procedure section of 

source library 
Sequence specifications from system 

input device 



/ 



£ 




OOOOOHSORTA 

(lieader specification) 



// RUN 



// CALL name, unit 



U/l 



I Any number of 
> field and record 
I type specifications 



Placing FILE statements between 
the CALL and RUN statements 
will override the FILE statements 
' in the OCL procedure. 



^' N 




fltCf! 382 



I ,^, 



Z 



// COPY FROM- 
READER, LIBRARY-P, 
NAME-name.TO-unit, 



RETAIN 



ill 



// RUN 



// LOAD$IVIAINT, unit 



V 
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TO USE FOR THE MODEL 10, THE MODEL 12, AND 
THE MODEL 15 
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The method you use to supply OCL and sequence specifica- 
tions depends on the type of sort you want to do: 



Type of Sort 


Method to Use 


How the Method Works 


Sort jobs you plan 


OCL from system input 


You supply both OCL and sequence 


to run only a few 


device; sequence specifi- 


specifications through the system 


times 


cations from system 
input device 


input device. 


Sort jobs you plan 


Both OCL and sequence 


You place the OCL statements and 


to run repetitively 


specifications from pro- 


sequence specifications in the 




cedure section of source 


procedure section of the source library 




library (maximum of 25 


using library maintenance, then access 




specification statements 


them with CALL and RUN 




allowed in procedure) 


statements. 


Sort jobs you plan 


OCL from procedure 


You place OCL statements in the pro- 


to run using the 


section of source library; 


cedure section of the source library, 


same file but dif- 


sequence specifications 


then access them using CALL and 


ferent sequence 


from system input 


RUN statements. You supply 


specifications 


device 


sequence specifications through the 
system input device. 




OCL from system input 


You supply OCL from the system input 




device; sequence specifi- 


device. The SOURCE statement 




cations accessed from 


accesses sequence specifications 




source section of source 


which you have placed in the source sec- 




library by SOURCE 


tion of the source library. 




statement from the 






system input device 






OCL from the procedure 


You place OCL statements in the pro- 




section of source library; 


cedure section of the source library, then 




sequence specifications 


access them using CALL and RUN 




accessed from source sec- 


statements. The SOURCE statement 




tion of source library by 


accesses sequence specifications 




SOURCE statement 


which you have placed in the 




from the system input 


source section of the source library. 




device or from the pro- 






cedure section of the 






source library 
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Appendix C. Collating Sequence 



Standard EBCDIC Collating Sequence 


When Both Zone and Digit Portions of 
Characters are Used 


When Only the Zone Portion of 
Characters is Used 


When Only the Digit Port 
Characters is Used 


on of 


Order 
in the 
Sequence' 


Character 


Corresponding 

Hexadecimal 

Number^ 


Order 
in the 
Sequence^ 


Character 


Corresponding 

Hexadecimal 

Number^ 


Order 
in the 
Sequence' 


Character 


Corresponding 

Hexadecimal 

Number^ 


1 
(lowest) 


blanl< 


40 


1 
(lowest) 


4: 

< 

( 
+ 


4A 
4B 
4C 
4D 
4E 
4F 


1 
(lowest) 


blank 

e 

- (minus) 

( 



40 
50 
60 
DO 

FO 


2 


(t 


4A 


3 




4B 


4 


< 


40 


5 


( 


4D 


6 


+ 


4E 


2 


! 

$ 

) 

n 


5A 
58 
50 
5D 
5E 
5F 


2 


/ 
A 
J 
1 


61 
01 
D1 
F1 


7 


1 


4F 


8 


s 


50 


9 


1 


5A 


10 


s 


5B 


3 


B 
K 
S 
2 


02 
D2 
E2 
F2 


11 


* 


5C 


12 


) 


5D 




/ 


61 
68 
6C 
60 

6E 
6F 


13 




5E 


14 


1 


5F 


i % 


4 




L 
T 
3 


C3 
D3 
E3 
F3 


15 


- (minus) 


60 


3 


(underscore) 
> 
7 


16 


/ 


61 


17 


, 


68 


18 


% 


60 


5 


D 
M 
U 
4 


04 
D4 
E4 
F4 


19 


(underscore) 


6D 


4 


# 

(apostrophe) 


7A 
78 
70 
7D 

7E 
7F 


20 


> 


6E 


21 


? 


6F 


6 


E 
N 
V 
5 


05 
D5 
E5 
F5 


22 




7A 


23 


# 


7B 


24 


(S) 


70 


25 


(apostrophe) 


7D 


5 


S 
A 
B 

D 
E 
F 
G 
H 
1 


50 
01 
02 
03 
04 
05 
06 
07 
08 
09 


7 


F 

W 
6 


06 
D6 
E6 
F6 


26 


= 


7E 


27 




7F 


28 


A 


01 


8 


G 
P 
X 

7 


C7 
D7 
E7 
F7 


29 


B 


02 


30 


C 


03 


31 


D 


04 


32 


E 


05 


9 


H 
Q 
Y 
8 


08 
D8 
E8 
F8 


33 


F 


06 


34 


G 


07 


6 


- (minus) 
\ 
\ 
J 
K 
L 
M 
N 

P 
Q 
R 


60 
DO 

D1 
D2 
D3 
D4 
D5 
D6 
D7 
D8 
D9 


35 


H 


08 


36 


1 


09 


10 


1 

R 
Z 
9 


09 
D9 
E9 
F9 


37 


( 
) 


DO 


38 


J 


D1 


39 


K 


D2 


11 


I 


4A 
5A 
7A 


40 


L 


D3 


41 


M 


D4 


■ 42 


N 


D5 


12 


$ 

'# 


48 
58 
68 
78 


43 





D6 


44 


P 


D7 


45 


Q 


D8 


7 


s 

T 
U 
V 

w 

X 

Y 
Z 


E2 

E3 
E4 
E5 
E6 
E7 
E8 
E9 


46 


R 


D9 


13 


< 


4C 
50 
60 
70 


47 


S 


E2 


48 


T 


E3 


49 


U 


E4 


50 


V 


E5 


14 


( 
) 

(underscore) 
(apostrophe) 


4D 
5D 
6D 

70 


51 


w 


E6 


52 


X 


E7 


53 


Y 


E8 


8 

(highest) 


blank 

1 
2 
3 
4 
5 
6 
7 
8 
9 


40 
FO 
F1 
F2 
F3 
F4 
F5 
F6 
F7 
F8 
F9 


54 


z 


E9 


55 





FO 


56 


1 


F1 


15 


+ 
> 


4E 
5E 
6E 
7E 


57 


2 


F2 


58 


3 


F3 


59 


4 


F4 


60 


5 


F5 


16 
(highest) 


"1 


4F 
5F 
6F 
7F 


61 


6 


F6 


62 


7 


F7 


63 


8 


F8 


64 
(highest) 


9 


F9 



When several characters share the same position in the sequence, they are considered equal. For example, 
if you are using only the digit portion of characters; H, Q, Y and 8 (position 9) are considered equal. 
This is the number you use in ALTSEQ statements to identify a character you want to shift to a different 
order in the sequence. 
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STANDARD COLLATING SEQUENCE 



Coding Rules 



The standard collating sequence chart shows the three 
standard collating sequences for System/3: 

• Standard collating sequence when both zone and digit 
portions of characters are being used 



1 . Code ALTSEQ in the first six positions to tell disk 

sort you want to alter the standard collating sequence; 



ALTSEQ 




• Standard collating sequence when only the zone portion 
of characters is being used 

• Standard collating sequence when only the digit portion 
of characters is being used 



ALTERNATE COLLATING SEQUENCE 

If you want to change the standard collating sequence, you 
must code an S in column 26 of the header specification 
and code ALTSEQ statements. You can code as many 
ALTSEQ statements as you need. Each one must begin 
with ALTSEQ and can contain a maximum of 96 positions. 

Note: Do not use a packed or unpacked factor 1 in an 
include or omit record type specification (P or U in column 
8) if you specify an alternate collating sequence. 



2. Leave the next two positions blank: 



^ 



3. Enter the hex equivalent of the character you are 
taking out of its normal sequence: 



A L T S E 1 O 



^ h n ^ (hn - 



hex number) 



4. Enter the hex equivalent of the value the character 
specified in columns 9 and 10 is to assume in the 
collating sequence: 



Q 



Cfh I ""D 



(hn = hex number) 



5. Enter as many pairs of 3 and 4 as the number of 
characters you are taking out of normal sequence. 



6. Leave no spaces between sets of hex numbers: 




7. When you reach the end of one statement, you can 
continue on the next specification line (follow rules 
1-6) 

8 Enter a double asterisk in positions 1 and 2 to indicate 

the end of the ALTSEQ statements: 



A 
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Q 
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n 










i 1 1 
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maxtmum of 96 positions 
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See standard collating chart tor hex equivalents of all System/3 
characters. 
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Input Order When ALTSEQ Statements Are Used 

ALTSEQ statements follow the header line. When you use 
an alternate collating sequence, your input must be in this 
order: 

1. OCL statements 

2. Sequence specifications 

a. Header line 

b. ALTSEQ statements 

c. '* 

d. Record type and field description lines as required 

3. File to be sorted 



Programming Considerations 

When you move a character into the sequence position 
normally assigned to another, both the new and the original 
character occupy the same position and are considered equal 
(see the first sample ALTSEQ statement). If you do not 
want the two characters to be equal, you must also move 
the character that normally occupies that position (see the 
second ALTSEQ statement). 



Programming Considerations Witti Card or 374 1 Input 

Whenever a record is padded on the right with blanks, the 
padded area is altered by the ALTSEQ logic. 



Effect of ALTSEQ Statements on Other Coding 

ALTSEQ statements can change; 

• Factor 1 and factor 2 

• Normal and opposite control fields 

• Control field characters before they are replaced or 
added to by forced fields 

ALTSEQ statements never change data fields in records or 
forced control field characters. 



Sample ALTSEQ Statements 

To change the sequence of one character: 

ALTSEQ ALTSEQ 40F0 

Statements ** 

Explanation Blank (40) is moved to the position in 
the collating sequence occupied by 
zero (FO). Blanks and zeros, therefore, 
are considered equal. 

To change the sequence of several characters: 



ALTSEQ 
Statements 

Explanation 



ALTSEQ 5BC8C8C9C9D1 



5BC8 moves $ (5B) to the position 
occupied by H (C8). 

C8C9 moves H (08) to the position 
occupied by I (C9). 

C9D1 moves I (09) to the position 
occupied by J (D1). 

The $, therefore, has been inserted be- 
tween G and H, as follows: 
A,B,C,D,E,F,G,$,H,I, (I and J occupy 
the same position). 



PROGRAMMING AIDS 

A Translation Table and Alternate Collating Sequence Cod- 
ing Sheet, X2 1-9096, is available for you to use to keep 
track of changes you make to the collating sequence. 
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Appendix D. Timing Considerations 



The time it takes*to run a sort job can vary greatly and is 
dependent on the following factors: 

• The amount of main storage available for the sort 
program 

• Number of records to be sorted 

• Record size 

• Number of sequence specifications 

• Whether alternate collating sequence is being used 

• Disk location of the input, work and output files 

• Order of control fields in the input file 

• Whether or not automatic work file allocation is 
being used 

• Use of nonverify option 

• Number of input files and the types of input devices 
(Model 12 and Model 15) 

Here is how each factor affects the length of a sort job. 



MAIN STORAGE SIZE 

The more main storage the program has: 

• The more sequence specifications you can have 

• The longer your records can be 

• The faster your sort job will run 

See Appendix E for more information and detailed charts. 

NUMBER OF RECORDS TO BE SORTED 

The more records you want to sort, the longer the sort 
job will take. For the most efficient sort job, therefore, 
use the record omit option whenever possible. 



RECORD SIZE 

The larger the records, the longer it will take to sort a file. 
So, if program run time is important to you, do not include 
fields that contain unnecessary information on your field 
specifications. (Every field you do not include decreases 
the record size by the length of that field.) Remember, disk 
sort builds a work record for each input record included in 
the sort. 
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NUMBER OF SEQUENCE SPECIFICATIONS 



ALTERNATE COLLATING SEQUENCE 



The more sequence specifications you use, the less main 
storage space will be available for records. 



Using an alternate collating sequence increases the time it 
takes to run a sort job. 



• Each sequence specification uses about 25 bytes of stor- 
age (remember that comment lines use no main storage). 

• The select/build routine uses approximately 100 bytes of 
storage for functional interfacing. 

• If you have specified includes and/or omits (referring to 
packed data) for your sort run, the select/build routine 
will use an additional 200 bytes of storage. 

• If you have specified field statements (referring to packed 
data) for your sort run, the select/build routine will use 
an additional 80 bytes of storage. 

• Any alternate collating sequence uses an additional 375 
bytes of storage. 

But consider using additional sequence specifications to ex- 
clude records you do not want to sort. The result may well 
be a shorter program run than if you use fewer specifications 
but process more records. 



DISK LOCATION OF THE FILES 

Because the disk sort program must move each record you 
want to sort two times (first from the input file to the work 
file and then from the work file to the output file), file 
location is an important factor in how long it takes to run 
a job. It is important to minimize the distance the disk 
arm must travel between the input and work file and be- 
tween the work and output file. The following diagrams 
show different ways of locating the input, work, and out- 
put files for a sort job. 

Within each diagram, the different methods of file place- 
ment are shown in order of usual performance character- 
istics. Each succeeding method will normally run faster 
than the methods preceding it. For systems having one 
(or two) 5445 disk storage units available for use with sort, 
work files should be placed on a 5445 disk storage unit, if 
possible. If D1 and D2 are both available, put the work file 
on one drive and the input and output files on the other. 



Amount of Main 
Storage Assigned 
to Disk Sort' 


Maximum Recommended 
Number of Bytes of 
Select/Build Code 


5K 


768 


6K 


768 


7K 


1024 


8K. 


1280 


9K 


1536 


10K 


1792 


11K 


2048 


12K 


2304 


13K 


2560 


14K 


2816 


15K 


3072 


16K 


3328 


17K 


3584 


18K 


3840 . 


19K and above 


4096 


1 Maximum storage in the Model 6 is 16K 
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5444 File Placement 
Using one disk on a single 
drive system 



nput Work Output 



Output Work Input 



Using two disks on a single 
drive system 



Work 



input 



Output 



Work 



Output Input 



Using three disks on a dual 
drive system 



Drive 1 






Work 



/ Drive 
\ 



Input 



Output 



Using four disks on a dual 

drive system 



Drive 1 



Drive 



Drive 1 



Drive ? 



R1 



Fl 



R1 



Fl 



R1 



R2 



i 


In 


put 




1 
1 

1 


Output i J 


! 


Work , 




or 








Input 






|_- 




L 






Output 






Work 






Work 





Fl 



R2 



F2 



R1 



Fl 



R2 



F2 



R1 



R1 



5445/3340 File Placement 



Using one drive 




Input Work | Output I D1 
1 L 



Using two drives 



Output 



Work 



Input 



Input 



Work 



Output 



D1 



D2 



D1 



D2 



Work 



I D1 



Input 



Output 



D2 



Note: If the input and output files are on drives separate 
from the work file, this is optimal file placement. If addi- 
tional 5445 or 3340 disk drives are available (up to four 
on Model 15), then much larger files can be sorted and 
optimal file placement is easier. 
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ORDER OF THE CONTROL FIELDS IN THE INPUT FILE 

Suppose two files contain identical information; however, 
some of the first file's records and fewer of the second file's 
records are in the sequence you want. Using the same 
sequence specifications to sort each file, disk sort takes less 
time to sort the first file. 



USE OF THE AUTOMATIC WORK FILE ALLOCATION 
FUNCTION 

Using the automatic work file allocation function generally 
increases the time needed to run a sort job, because this 
function does not always provide the work file arrangement 
needed for a fast sort run. If you are concerned with mini- 
mizing sort run-time, use a well planned work file and work 
FILE statement, rather than automatic work file allocation. 



NONVERIFY OPTION 

If an N is entered in column 34 of the disk sort header state- 
ment, the disk sort program will not verify data written on 
the work file. The nonverify option can be used on either a 
5444 or 5445 disk pack. The amount of performance im- 
provement depends on file size, number of records, file 
locations, etc. 

Note that when a work file statement is specified for a 
3340 file (D1, D2, etc) on Mode! 15, the verify option is 
taken from the file statement and column 34 is ignored. 



SAMPLE DISK SORT TIMINGS 

The following timings are supplied to aid you in approxi- 
mating job run times. The sort times shown were generated 
under the followinq conditions; any changes may decrease 
performance: 

• Core sizes shown refer to the amount of main storage 
used by disk sort, excluding the supervisor. 

• All timings reflect the total sort run time (generation 
time plus execution time). 



• All runs were made using SORTR, and the record lengths 
shown reflect input, work, and output record lengths. 

• All control fields used were ten characters long. 

• All input records were included for minimum select/build 
generation. 

• Alternate collating sequence was not used. 

• No alternate track assignments were made. 

• Automatic work file allocation was not used, 

• Optimal file placement was used for all runs (see D/s/f 
Location of the Files). 

Model 6 and Model 10 Timings Only 

• Input, work, and output files resided on 5444 Model 2 
and 5445 disks for 5444 and 5445 timings, respectively. 

• None of the 5445 disks are split cylinder files. 

• The input files was overlaid by the output file to minimize 
file space usage. 

• All files were sorted into inverse sequence (from ascending 
to descending sequence). 

Model 15 Timings 

• Input and output files were on D1; work files were on D2. 

• Only one partition was active during the timings. 

• All OCL and sort specifications were put on a spool file 
on D3. 

• All files were sorted into descending sequence (from 
random sequence to descending sequence). 
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Sample Model 6 and Model 10 Timings 



5K Partition 

5,000 Records 
10,000 Records 

5444 ) 12K Partition 
Timings \ 5,000 Records 

10,000 Records 
28K Partition 

5,000 Records 

10,000 Records 
12K Partition 

10,000 Records 

30,000 Records 

5445 I 28K Partition 
Timings / 10,000 Records 

30,000 Records 
44K Partition 

10,000 Records 
30,000 Records 



_. — ^ 

Record Size 


Single 


Drive 


Dua Drive 


96 bytes 


200 bytes 


96 bytes 


200 bytes 


18 min. 


49 min. 


1 1 min. 


30 min. 


34 


107 


21 


62 


7 


15 


7 


11 


14 


31 


11 


21 


5 


8 


5 


8 


9 


17 


9 


13 


9 


14 


9 


12 


32 


52 


25 


33 


7 


10 


7 


10 


17 


31 


17 


/ 


7 


9 


6 


9 


16 


26 


15 


\ 



Note: All times are rounded to the nearest minute. 
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Sample Model 15 Timings 



Model 15A 

5445 

Timing 



Model 15B 
and C 3340 
Timing 



Model 15D 

3340 

Timing 



/24K Partition 

5,000 Records 
10,000 Records 
20,000 Records 
50,000 Records 

|48K Partition 

5,000 Records 
10,000 Records 
20,000 Records 
50,000 Recoids 

'24K Partition 

5,000 Records 
10,000 Records 
20,000 Records 
50,000 Records 

48K Partition 

5,000 Records 
10,000 Records 
20,000 Records 
50,000 Records 

24K Partition 

5,000 Records 
10,000 Records 
20,000 Records 
50,000 Records 

48K Partition 

5,000 Records 
10,000 Records 
20,000 Records 
50,000 Records 



100 byte 


Record Size 


) 




200 bytes 


3 Mm. 


38s 


4 Min. 


56s 


5 


24 


8 


28 


10 


1 


17 


12 


23 


23 




- 


3 


4 


3 


47 


4 


28 


6 


48 / 


7 


50 


11 


37 


19 


10 


31 


25 

1 


1 


52 


2 


- \ 


3 


9 


5 


18 


6 


17 


9 


40 


15 


53 




/ 


1 


31 


1 


56 


2 


36 


3 


43 


5 


3 


7 


1 \ 


12 


42 


18 


55 \ 


1 


34 


2 


. / 


2 


43 


4 


13 


5 


9 


8 


42 



13 



26 



23 



14 



1 


21 


1 


48 / 


2 


16 


3 


'' \ 


4 


16 


6 


^ \ 


10 


46 


16 


30 1 



Note: These sample timings increase in direct proportion to the number 
of records. For example, using the 5444 (12K partition with a single 
drive) to sort 7500 96-byte records would take approximately 10 minutes. 
That is, about 50% inore records are being sorted (50% of 5000 = 2500; 
2500 + 5000 = 7500) so the sorting time takes 50% longer (50% of 7 = 
about 3; 3 + 7 = 10). 



Sample Model 12 Timings 

Use the sample timings illustrated foi Model 15B for a reasonable 
approximation for the Model 12 run times. 
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Appendix E. Calculating Size of Files 



INPUT FILE 

Use this formula to calculate how many tracks the input 
file will require: 

Number of records in the file x i nput record length 
Number of bytes in a track 

The number of bytes in a track is 6144 for the 5444, 5120 

for the 5445, and 12,288 for the 3340 (Model 12 and 

iVIodel 15). Round the result up to the nearest whole number. 



OUTPUT FILE 

Use this formula to calculate how many tracks the output 
file will require: 



Number of records to be sorted x o utput record length 
Number of bytes in a track 

The number of bytes in a track is 6144 for the 5444, 5120 
for the 5445, and 12,288 for the 3340 (Model 12 and Model 
15). Round the result up to the nearest whole number. 

Note: Number of records to be sorted means the number 
of records that will be selected to be sorted. 



WORK FILE 

Do not use RECORDS to specify the work file, use 
TRACKS. 

Use this formula to approximate how many tracks the work 
file will require: 

Number of records to be sorted x 
2 +/ work record length x 

approximate work file size factor 

Number of bytes in a track 

The number of bytes in a track is 6144 for the 5444, 5120 
for the 5445, and 12,288 for the 3340 (Model 12 and Model 
15). Round the result up to the nearest whole number. 

Rather than using this formula to calculate the number of 
work file tracks needed for each additional run of this job, 
you can use the actual number of tracks of work file used 
in this sort. This number is automatically calculated at the 
end of first pass #0 and is printed out as message SD695. 
In order to save time, you can use automatic work file 
allocation for the first run. Then, in subsequent runs, use 
work FILE statements specifying the number of tracks 
printed in message SD695. 



Work Record Length 



Type of Sort 


Type of Output 


Work Record Length 


SORTA 


Address output 


Length of control fields +3 


SORTR o( 


Control fields only 


Length of control fields as 


SORTRS 




specified in the header line 


Conl^^ol fields and 


Length of data + length of 




data 


control fields. (This is the 
output record length speci- 
fied in the header line.) 


Data only 


Length of data + length of 






control fields. (Output rec- 






ord length specified in head- 






er line plus the control field 






length specified in header 






line.) 
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The following table shows the maximum work record 
length for a disk sort run, using various combinations of 
main storage size, input record length, and number of bytes 
of select/build code. For example, if disk sort is assigned 
12K of main storage and your input record length is 1600 
bytes, the maximum work record length you can have, us- 
ing the recommended maximum number of bytes of 
select/build code, is 2808 bytes. However, if you used 



fewer than 256 bytes of select/build code in the same 
situation, you can have a work record length of 3064 
bytes. Generally, then, this table shows that for a given 
amount of main storage, the maximum work record length 
can be increased by using either fewer bytes of select/build 
code, or smaller input records, or both. This table can also 
be used to estimate the maximum input and output block 
size for tape input/output. 



Amount of 
Main Storage 
Assigned to 
Disk Sort 


INPUT RECORD LENGTH 


Maximum 
Work Record 
Length 


For Jobs with Fewer than 
256 Bytes of Select/Build 
Code 


For Jobs with Wlaximum 
Recommended Number of 
Bytes of Select/Build Code' 


6K 


01-768 


01-384 


7602 


769-896 


385-640 


504 


897-1024 


641-768 


2483 


8K 


01-1792 


01-896 


17842 


1793-1920 


897-1408 


1528 


1921-2048 


1409-1536 


1272 


2049-2176 


1537-1664 


1016 


2177-2304 


1665-1792 


760 


2305-2432 


1793-1920 


504 


2433-2560 


1921-2048 


248 ■' 


9K 


01-2176 


01-1152 


2040 


2177-2304 


1153-1664 


1784 


2305-2432 


1665-1792 


1528 


2433-2560 


1793-1920 


1272 


2561-2688 


1921-2048 


1016 


2689-2816 


2049-2176 


760 


281 7-2944 


2177-2304 


504 


2945-3072 


2305-2432 


2483 


12K 


01-3200 


01-1408 


3064 


3201-3328 


1409-1920 


2808 


3329-3456 


1921-2432 


2552 


3457-3584 


2433-2560 


2296 


3585-3712 


2561-2688 


2040 


3713-3840 


2689-2816 


1784 


3841-3968 


2817-2944 


1528 


3969-4096 


2945-3072 


1272 




3073-3200 


1016 




3201-3328 


760 




3329-3456 


504 




3457-3584 


248' 


20K 

and up 


01-4096 


01-4096 


4096 








^See Number of Sequence Specifications in Appendix D for nnaximum 
recommended number of bytes of select/build code per job. 

2|\lot valid for SORTRS (summary sort). 

■'For SORTA (addrout sort), 245 is tlie largest total length of control 
fields for any record type. 
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Work File Size Factor 



Amount of 
Main Storage 
Assigned to 
Disk Sort 


INPUT RECORD LENGTH 


Approximate 
Work File 
Size Factor 


For Jobs with Less than 
11 Sequence Specifications 


For Jobs with 1 1 or More 
Sequence Specifications 


6K 


01-768 


01-384 


1.52 


769-1024 


385-768 


2.05 


8K 


01-1792 


01-896 


1.17 


1793-1920 


897-1408 


1.20 


1921-2048 


1409-1536 


1.25 


2049-2176 


1537-1664 


1.35 


2177-2304 


1665-1792 


1.52 


2305-2432 


1793-1920 


2.05 


2433-2560 


1921-2048 


2.05 


9K 


01-2176 


01-1152 


1.15 


2177-2304 


1153-1664 


1.17 


2305-2432 


1665-1792 


1.20 


2433-2560 


1793-1920 


1.25 


2561-2688 


1921-2048 


1,35 


2689-2816 


2049-2176 


1.52 


2817-2944 


2177-2304 


2.05 


2945-3072 


2305-2432 


2.05 


12K 


01-3200 


01-1408 


1.09 


3201-3328 


1409-1920 


1.10 


3329-3456 


1921-2432 


1.12 


3457-3584 


2433-2560 


1.13 


3585-3712 


2561-2688 


1.15 


3713-3840 


2689-2816 


1.17 


3841-3968 


281 7-2944 


1.20 


3969-4096 


2945-3072 


1.25 




3073-3200 


1.35 






3201-3328 


1.52 




3329-3456 


2.05 




3457-3584 


2.05 


20K 

and up 


01-4096 


01-4096 


1.07 
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EXAMPLE 

For this example, assume these values: 

Number of records in the file or files (Model 15 only) 
2000 

Number of records to be sorted = 1000 

Input record length = 200 bytes 

Work record length: 

SORTA = 13 bytes (control field length = 10) 
SORTR = 210 bytes (control field length = 10) 

Output record length: 

SORTA = 3 bytes 

SORTR = 200 bytes (drop control field) 

Main storage size = 8K 

Work file size factor =1.17 

Here are the calculations: 

5444 Disk Files 



Input 
file 



SORTR 



' 2000 X 200 ^ 



6144 



65.1 



SORTA 



66 tracks 



' 2000 X 200 



6144 



65.1 



66 tracks 



Work 
file 



''1000x210\ X (1.17) +2 = 41.99 



6144 



42 tracks 



' 1 000 X 1 3 



6144 



X (1.17) +2 = 4.48 



5 tracks 



Output 
file 



'1000x200\ = 32.6 



6144 



33 tracks 



/1000x3\ 


= 0.49 




\ 6144 / 


1 track 



Total tracks for all files = 141 



Total tracks for all files = 72 
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5445 Disk Files 



SORTR 



SORTA 



Input 
file 


/ 2000 X 200 \ = 78.1 




/ 2000 X 200 \ 


78.1 






\ 5120 1 


79 tracks 


\ 5120 / 


79 tracks 














Work 
file 


/lOOOx21o\ X (1.17)+ 2 =49.99 




/lOOOx 13 \ 


< (1.17) 


t 2 - 4.97 




\ 5120 1 


50 tracks 


\ 5120 / 


5 tracks 














Output 
file 


/ 1000 X 200 \ = 39.1 




/ 1 000 X 3 \ 


- .59 






\ 5120 / 


40 tracks 


\ 5120 y 


1 track 
















Total tracks for all files = 169 




Total tracks for 


all files = 85 



3340 Disk Files (Model 12 and Model 15) 



Input 
file 



Work 
file 



Output 



file 



SORTR 



2000 X 200 \ = 32.6 



12288 



12288 



33 tracks 



lOOOx 210 \ X (1.17) ¥ 2 = 19.1 



20 tracks 



/ 1000x200 \ 


= 16 


3 


y 12288 j 






17 tracks 



Total tracks for all files = 70 



SORTA 



2000 X 200 



12288 



1000 X 13 



12288 



1 000 X 3 



12288 



32.6 



33 tracks 



X (1.17) + 2 - 3.3 



4 tracks 



1 track 



Total tracks for all files = 38 
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Appendix F. Messages 



An alphabetic code helps you judge the significance of each 
disk sort message: 



Code 


Meaning 


Significance 


- — 


T 


Teimindl 


The error was destructive. The program must end immediately. 


S 


Severe Erroi 


No rTiore error messages will be printed. 


A source statement contains an error. The program ends after 


A 


Action 


fhe generation phase. 


The operator must do something, A system halt follows this 






message. 


vv 


VVuiriiny 


An unusual condition has been found. It should be checked out 
to make sure it did not occur as a result of a programming error. 


1 


informal ion 


For information only. Messages with an 1 code indicate current 
status and progress of job. 



To undeistand the messages, you must also know something 
about how the disk sort program works. Specifically, you 
must know what happens during the generation phase of 
the program and what happens during the execution phase. 

The generation phase translates your sequence specifications 
into machine language; 



Se^iuence Si^ecifications 



Generation Phase 




Obiect Program ' 





The execution phase gets the records you want sorted, 
sorts the records, and finally writes the sorted records onto 
the output file in the order you want them. 



The object program is often referred to as ttie select/build routine. 
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SD100-ENTER SORT SEQUENCE SPECIFICATIONS- 
HEADER FOLLOWED BY INCLUDE/OMIT SETS OR 
// SOURCE NAME, UNIT STATEMENT 



SD102-SORT JOB ASSUMED TO BE SORTR 



Code: 

Explanation: 



System Action: 
User Response: 



A-Action 

You must tell the system where the 
sequence specifications for the job are. 
There are two possibilities: the operator 
is going to type them on the keyboard 
(Model 6), on the printer/keyboard (Model 
1 or Model 1 2), or they are already in a 
source library on one of the disks. 
System waits for response from operator. 
If the operator is going to type the 
specifications on the keyboard (Model 
6), or printer/keyboard (Model 10 
or Model 12), he or she must follow 
this sequence: 

1 . Header line 

2. All the include/omit sets 

3. //END 

If the sequence specifications are already 
in a source library on one of the disks 
the operator types a SOURCE state- 
ment. This gives the system the name 
and disk drive location of the set of 
sequence specifications. 



SD101-PRINT OPTION ASSUMED TO BE 

Code: I— Information 

Explanation: The print option in your header line is 

not blank 0, 1, 2 or 3; therefore, it is 

assumed to be 0. 
System Action: The job continues. 
User Response: None required. 



Code: 
Explanation: 



System Action: 
User Response: 



VV- Warning 

Neither SORTA,SORTR, or SORTRS job 
type is specified on your header Ime. 
Because an output record length is speci- 
fied, SORTR IS assumed. 
The job continues. 

Check to make sure that a SORTR job 
was wanted. To avoid this error the next 
time the job is run, fill in columns 7-12 
of the header ime properly. 



SD103-SORT JOB TYPE NOT SPECIFIED 



Code: 
Explanation: 



T— Terminal 

Neither a job type nor an output record 

length is specified in the header line. 
System Action: The job ends. 
User Response: Place the proper job type in columns 

7 12 of your header line. Resubmit job. 



SD104-BOTH INPUT AND INPUT1 ARE PRESENT 
(Model 12 and Model 15) 



Code: 
Explanation: 



System Action; 
User Response: 



S "Severe Error 

The filenames INPUT and INPUT1 are 

considered equivalent by disk sort. Only 

one of these filenames may be used in 

a disk sort. 

The job ends after the generation phase. 

Eliminate one of the FILE statements 

or change one of the filenames to 

INPUT2, INPUTS , INPUTS. 



SD105-INPUT FILE NOT ONLINE(Disk Sort only) 

Code: T-Terminal 

Explanation: Pack (or packs) containing the input file 

is not mounted. 

System Action; Halt 25 occurs tor Model 10, Model 12, 
or Model 15, halt CD45for Model 6, 

User Response; Mount the pack (or packs) containing 
the input file. If the input file is multi- 
volume offline (if more than one pack 
is assigned to a removable unit), only 
the first pack assigned to each unit must 
be mounted. Resubmit the job. 
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SD106-WORK FILE NOT ON DISK (Not CCP/Disk Sort) 



Code: 
Explanation: 



System Action: 
User Response: 



T— Terminal 

The work FILE statement specifies that 

the work file is to reside on a device other 

than disk, and disk sort requires the work 

file to be on disk. 

The job ends. 

Either omit the work Fl LE statement or 

specify the work file to be on disk. If 

you omit the work FILE statement, disk 

sort automatically allocates your work 

file. 



SD108-INPUT AND/OR OUTPUT FILE STATEIVIENT 
MISSING 



Code: 
Explanation: 

System Action: 



User Response: 



T— Terminal 

Either the input or output (or both) 

FILE statement is missing in this run. 

The job ends. The CD45 halt (Model 6) 

or 25 halt (Model 10, Model 12, or 

Model 15) cancels the job. 

Include missing FILE statement(s) and 

resubmit the job. 



SD109-WORK FILE STATEMENT MISSING 

Code: S— Severe error 

Explanation: A work file was not specified. 

System Action: The job ends after the generation phase. 
User Response: Include the missing FILE statement 
and resubmit the job. 



SD150-CONTROL FIELD DROPPED-NO DATA 
SPECIFICATIONS 

Code: S— Severe 

Explanation: No data specifications (summary specifica- 

tions included) were given, yet the control 
field is being dropped, if the sort were 
allowed to continue, the output file would 
be all blanks (X'40'). 

System Action: The job ends after the generation phase. 

User Response: Add data field specifications and/or retain 
the control field; then resubmit the job. 
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SD151-C0NTR0L FIELD LENGTH NOT SPECIFIED 

Code: T—Terminal 

Explanation: No control field length specified on 

header line. 

System Action: The job ends. 

User Response: You must place the length of your control 
fields in columns 13-17. Do so, and re- 
submit job. 



SD152-CONTROL FIELD LENGTH TOO LARGE 

Code: S— Severe error 

Explanation: Control field specified too large; 256 is 

assumed. 
System Action: The job ends after the generation phase. 
User Response: Make the control field length in columns 

13-17 256 or less. Resubmit job. 



SD153-INPUT RECORD LENGTH UNDETERMINABLE 

Code: T—Terminal 

Explanation: The record length of your input file 

cannot be determined from information 
stored on disk. 

If you specified RECORDS or 
TRACKS on the File statement for 
the input file and the file was not on 
the specified pack, sort was processing 
a newly created file and not your 
input file. 

CCP/Disk Sort users - Columns 39 and 
40-43 of the header statement did not 
contain an R or C followed by the input 
record length. 

System Action: The job ends. 

User Response: This is a system-program error. If error 
persists, contact your IBM representative 
for program assistance. 
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SD154-ASCENDING SEQUENCE ASSUMED A, 
COLUMN 18 



SD157-OUTPUT RECORD LENGTH TOO LARGE 



Code: 
Explanation: 



System Action: 
User Response: 



W-Waming 

Column 18 of your header line has 

neither a D for descending, nor an A for 

ascending sequence. Disk sort assumes 

you want ascending sequence. 

The job continues. 

If you want descending sequence, you 

can cancel the job at the CI 23 halt 

(Model 6), or at the 22 halt (Model 10, 

Model 12, or Model 15). 



Code: 
Explanation: 



System Action: 
User Response: 



S— Severe error 

This isaSORTR orSORTRS job. Out- 
put record length specified on header 
line is too large. Disk sort assumes you 
want the maximum length of 4096. 
The job ends after the generation phase. 
Make sure your header line is not shifted 
by one or more columns. Specify on out- 
put record length of 4096 or less and re- 
submit job. 



SD155-OUTPUT OPTION ASSUMED X, COLUMN 28 



Code: 
Explanation: 

System Action: 

User F^esponse: 



W-Warning 

Column 28 of your header line is neither 

an X nor blank. 

Disk sort assumes you want an X in 

column 28 and continues the job. 

if you do not want X, you can cancel the 

job at the CI 23 halt (Model 6), or at the 

22 halt (Model 10, Model 12, or 

Model 15). 



SD15(3-OUTPUT RECORD LENGTH NOT SPECIFIED 



SD158-OUTPUT RECORD LENGTH INCONSISTENT 

Code: S— Severe error 

Explanation: This is a SORTR or SORTRS job and 
you are not dropping the control field. 
Consequently, the output record length 
(Columns 29-32) that includes the con- 
trol field should not be less than the con- 
trol field (columns 13-17). 

System Action: A length equal to that in columns 29-32 
plus the largest total control field (col- 
umns 13-17) is assumed. 

User Response: Recompute your output record length, 
change it on your header line, and resub- 
mit the job. 



Code: S— Severe error 

Explanation: This is a SORTR or SORTRS job. Out- 
put record length not specified on header 
line. Disk sort assumes you want the 
maximum length of 4096. 

System Action: The job ends after the generation phase. 

User f^esponse: Enter an output record length in columns 
29-32 of your header line and resubmit 
the job. 



SD159-WORK RECORD LENGTH TOO LARGE 

Code: S— Severe error 

Explanation: Disk sort's work record exceeds the 

maximum length allowed. 
System Action: Halt CD45 (Model 6) or halt 25 (Model 10, 

Model 1 2, or Model 1 5) occurs. 
User Response: Refer to Appendix E to determine the 

maximum work record length. 
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SD160-ALTERNATE COLLATING SEQUENCE 
ASSUMED 



SD164-SORTA-MULTIPLE INPUTS (Model 12 and 
CCP/Disk Sort) 



Code: 

Explanation: 
System Action: 

User Response: 



W-Warning 

Columns 26 is neither an S nor blank. 
Disk sort assumes you want an alternate 
collating sequence and continues the job. 
If you do want an alternate collating 
sequence, put an S in column 26 of your 
header line before running the job again. 
If you do not want an alternate collating 
sequence, you can cancel the job at the 
CI 23 halt (Model 6) or the 22 halt (Model 
10, Model 12, or Model 15). 



SD161-INVALID NUMBER IN CONTROL FIELD 

Code: T— Terminal 

Explanation: There is either a nonnumeric character or 

embedded blank in columns 13-17 of the 

header line. 
System Action: The job ends. 
User Response: Correct the mistake and resubmit the job. 



Code: 
Explanation: 



S— Severe error 

Addrout sort is invalid with multiple 

disk or tape files. 
System Action: The job ends after the generation phase. 
User Response: Modify your OCL to perform an 

addrout sort on a single disk or tape 

file, or merge all the files into a single 

file before performing an addrout 

sort. 



SD164-SORTA-CARD, 3741, OR MULTIPLE INPUT 
(Model 15 only) 

Code: S— Severe error 

Explanation: Addrout sort is invalid with card input, 

3741 input, or multiple disk or tape files. 

System Action: The job ends after the generation phase. 

User Response: Modify your OCL to perform an addrout 
sort on a single disk or tape file, or merge 
all the files into a single file before per- 
forming an addrout sort. 



SD162~INVALID NUMBER IN OUTPUT RECORD 
LENGTH 

Code: T— Terminal 

Explanation: There is either a nonnumeric character 

or embedded blank in columns 29-32 

of the header line. 
System Action: The job ends. 
User Response: Correct the mistake and resubmit the job. 



SD165-SORTA-ASCII TRANSLATE SPECIFIED 

Code: T— Terminal 

Explanation: If the addrout file is converted to ASCII, 

the result is an unusable file. 
System Action: The job ends. 
User Response: ASCII translate must not be specified if a 

tape addrout file is desired. 



SD163-SORTA-TAPE OUTPUT, RECORD LENGTH 
NOT 18 

Code: T-Terminal 

Explanation: The record length on the output FILE 

statement is not 18. 

System Action: The job ends. 

User Response: For a tape out[)ut file during a SORTA 
(addrout) sort, the record length on the 
output FILE statement must be 18. 
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SD166 -VERIFY OPTION ASSUMFD BLANK COLU.Vl^ 
34 



'"'LES (Model 10 



Code: W--VVariiin(; 

Explanation: Column 34 oi the heaiier riops r,ot ; iw,- 

ciii i\! oi J riank. Ols^. Go! t vvi:i .oni m!.c 
the sort, dnd assume that you meant ioi 
column 34 to be tjl.mk Ther-.-fore ji'v 
writes to th(> work hie wiil be veiituK! 

System Action: Disk soM assumes ttiat you wan^ ai.v 
writes to l':f work nie to In mmiI!," 

User Response: If you (tv.sac not t;, da.'" ,jil w. Ues to 

the woi k ; lie ./e; itieo, von liiust vi..'r a^: 
N in Golurra, 34 and lerun [he job 

SD167 INVALID STORAGE SIZE TO EXtCUTt 

Code: W-Wamina 

Explanation: The entry in cohiinns 37 So v;iis 

1 . BlaiT,- 01 norv.uinei n 

2. Less than 1? 

3 Greater than 48 

4 Not -, multiple o' 7 
System Action: For the ahjve cas.:-s the (..Uowmn 

detault:^ 0(,( ,'.! 

- - For ,.,;,Tii i ,,,,(! 2, !2 ,;> assuint;u 
■ Fo! item 3 48 is assume^' 

- Foi i.eiii 4, flu. voUii- IS ',:.y>'h' ) (i(;.,V' 
to tile next lowest n\^t> nn- ■:•,', J 

User Response: If the default is not jece;,t,.be> ente^ 
the prope' value anr' r-Si \-\\a\ i!u iwi; 



: '■> :t; X ASCII and 
■'' oiupur flies. Both 
'■■■■- ' !• s rviusi l)e the same 

^' .:'■ ouyii the qenoration 
he- .,.^;n sequence 
■ "i -uier, at tfie end 

■ •: ..1- fhey are the 
■ • 3CDIC). For 
.-■ L BGOIC input and 
- ■ ' ' -'-mJ*, translate the 
■ i^ '■ ■ ' :un the sort job. 

I ;i./r;;A I YPL SORT 

>-■ I. ;.ue; i /A (addrout) sort is 
v< ^ tcoiij number. Binary 
'H /-. ,oi ! cannot go on 

iiis aiu-i tiie generation phase. 
i . tiesired, output 
::..i- Oi 9 track tape. 



SD168-MISSING OR INVALID PROGRAM i-xjAivtf 

Code: W Waoni-g 

Explanation- iheeptr, ,;; •.;;,,.,,. /5-8U .'! I'le iieari- 

;.t;itemeii1 ■seitsii,; ijLn-, oi i!,:; ini^iv^'' 

progiam n.i:,-- 
System Action: The pioqiarr naiiU' ueTauMs lu S:n fiMi.l 
User Response: If the detuult li nc)! accu[ji.joie, enier ti;,; 

correct piociid'n udm,; in ; ■,,iin,n', /b b!J 

and >esubn>ii ii'r joo 
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SD173 -CONVERiOR OR TRANSLATOR NOT 
SPECIFIED 



Code: 
Explanation: 



System Action: 
User Response: 



S— Severe error 

Either the converter or translator must be 
specified on the FILE statement it an in 
put or output file is on 7-track tape. 
The job ends after the generation phase. 
Specify either converter or translator on 
the FILE statemient of the input or out- 
put file that is on 7-track tape. 



SD176- INVALID ALTERNATE SEQUENCE 
STATEMENT 



SD178-ALTSEQ STATEMENT HAS INVALID DATA 

Code; S— Severe error 

Explanation: The data to alter the normal sequence in 

the above ALTSEQ statement is in error. 
One of the 4-position groups (columns 
9-12, 13-16, etc.) does not contain a 
valid hex number (0-9 or A-F). 

System Action: The column(s) in error have been flagged 
with an * in the line printed above this 
message. Processing continues with the 
next 4-position group. The job ends after 
the generation phase. 

User Response: Correct the statement and resubmit the 
job. 



Code: S-Severe error 

Explanation: You specified an alternate sequence in 

column 26 of your header line The 
statement just read does not have 
ALTSEQbSbi in columns 1-8. Also it is 
not a comment statement or a valid sort 
specifications statement. 

System Action: The statement is ignoied, and the job 
ends after the generation phase. 

User Response: If the statement does not belong in the 
job, delete it. If it does belong in the 
job, correct it. 



SD177-MISSINGTHE ** STATEMENT 

Code: W-Warning 

Explanation: Disk sort has read the ALTSEQ state- 

ments specified m column 1 8 of your 
header line. An ** (columns 1-2) state- 
ment should follow the last ALTSEQ 
statement that precedes your include/ 
omit/field sort specification statements 
(l/O/F in column 6). However, the 
statement just read was an l/O/F 
statement. 

System Action: Disk sort assumies an ** statement before 
the l/O/F statement. 

User Response: Place an ** before the l/O/F statement 
before rerunning the job. 



SD179-~UNEXPECTED END-OF-FILE FOUND 

Code: T— Terminal 

Explanation: Disk sort was reading your ALTSEQ 

statements. Valid statements following 
an ALTSEQ statement are: another 
ALTSEQ statement, a comment statement, 
or an ** statement (columns 1-2), How- 
ever, disk sort found an end-of-file state- 
ment. (If your sequence specification 
statements are being read from the system 
reader, the program read a /*, /&, or // 
END statement.) 

System Action: Job ends at this point. No further state- 
ments are diagnosed. 

User Response: Make sure the last part of your sequence 
specifications are not missing. 



SD181-N0 VALID ALTSEOSTATEMENTS FOUND 



Code: 
Explanation: 



System Action: 



User Response: 



W— Warning 

ALTSEQ is specified on the header line, 

but the system cannot find any valid 

ALTSEQ statements. 

There will be no alternate collating 

sequence for this job; processing 

continues. 

If you want an alternate collating 

sequence, cancel the job at halt C123 

(Model 6) or halt 22 (Model 1 0, Model 

12, or Model 15), correct the ALTSEQ 

statements, and resubmit the job. If you 

do not want an alternate collating sequence, 

remove the S from column 26 of your 

header line. 
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SD202-INVALID SPECIFICATION TYPE, COLUMN 6 



SD208-OR CONTINUATION ASSUMED, COLUMN 7 



Code: 
Explanation 



System Action: 



S— Severe error 

The statennent makes no sense to disk sort 
because it is not a comment statement, an 
include statement, an omit statement, or 
a field statement. 

Disk sort bypasses the statement. The job 
ends after the generation phase. 
User Response: This statement is either misplaced or in- 
correctly typed. Correct the statement 
and resubmit job. 



SD204-E5LANK CONTINUATION ASSUMED, 
COLUMN 7 



Code: 
Explanation: 



System Action: 



User Response: 



W-Warning 

The referenced statement is the first in 
an omit or include set. However, it con- 
tains a nonblank character in column 7. 
A blank was expected. 
Disk sort ignores the nonblank character 
and processes the statement as though 
column 7 was blank. 
Correct statement before next job run. 



SD206-INVALID CONTINUATION, COLUMN 7 

Code: S— Severe error 

Explanation: The referenced statement is part of an 

include or omit set. It should have an A 
(AND) or O (OR) in column 7. However, 
it does not, nor does it contain a blank 
(see message SD208). 

System Action: Disk sort bypasses the statement and 

goes on to the next statement. Job will 
terminate at end of generation phase. 

User Response: Correct the statement before running the 
job again. 



Code: 
Explanation: 



System Action: 
User Response: 



W-Warning 

The referenced statement is part ot an 
include or omit set. It should contain an 
A (AND) or O (OR) in columti 7. How- 
ever, column 7 is blank. 
Disk sort assumes you want an in 
column 7. 

Check the order of your statements. 
Make sure you want an O in column 7, 
If you do not, you can cancel (he job at 
the CI 23 halt (Model 6) or the 22 halt 
(Model 10, Model 12, or Model 15) 



SD210-INVALID C/Z/D/P/U/V SPECIFICATION, 
COLUMN 8 



Code: 
Explanation: 



W-Warning 
Type of 
Statement 

Include or omit 
record type 

Control field 
statement' 

Data field or 
summary field 



Column 8 

Entry Should Be: 

C, Z, D, P, or U 

C, Z, D, P. or LI 

C Z, D, U, P or V 



System Action: Disk sort assumes you wan! a C in column 

8. 
User Response: Check the character ;n column 8 and 

correct the statement before rerunning 

this job. 



For an unconditional force or a force-all line, the column 8 entry 
must be a C. 
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SD212-SPECIFICATION IN WRONG LOGICAL ORDER 



SD218-TOO MANY SEQUENCE SPECIFICATIONS 



Code: S- Severe error 

Explanation: If this is a contro! field statement (F In 

coiurnn 6), it improperly follows an omit 
statement (O in column 6). If this is an 
omit statement, it improperly follows an 
include statement (I in column 6). 

System Action: This statement is bypassed and processing 
continues with next statement. The job 
ends after the generation phase. 

User Response: Put your statement in proper order and 
resubmit the job. 



SD214 -INCLUDE OR OMIT STATEMENT AFTER 
INCLUDE-ALL 



Code: S— Severe error 

Explanation: You have used all the main storage that was 

allocated by disk sort for the select/build 
routine and for error information. 

System Action: Disk sort reads and error checks any 
following statements, but the job ends 
after the generation phase. The area 
allocated for the select/build routine and 
error information is now used only for 
error information. 

User Response: Remove all causes of error messages. If 
this error occurs with no other error 
messages, decrease the number of sequence 
specifications. 



Code: S- Severe error 

Explanation: Disk sort has previously read an include- 

all statement. Now only control field 
statements (F in column 6) should be 
read. However, an include or omit (I 
or in column 6) was just read. 

System Action: This statement and all following state- 
ments are processed as though the include- 
all card had not been read. The job ends 
after the generation phase. 

User Response: Remove either the include-all statement 
or the include or omit statement. Resub- 
mit job. 



SD220-TOO MANY ERRORS 

Code: T— Terminal 

Explanation: The main storage that disk sort allocated 

for the select/build routine and error in- 
formation is now filled with error infor- 
mation (see message SD218). 

System Action: Disk sort will not read or diagnose any 
more statements. The job ends at this 
point. 

User Response: If your statements are being read from 
the system card input device, make sure 
you've included /* and /& statements. 



SD216-LAST SET NOT A VALID INCLUDE SET 



SD222-ZONE OR V FIELD-LENGTH EXCEEDS 1 



Code: S— Severe error 

Explanation: The last set of your sequence specifica- 

tions should have been an include set. 
However, one of the following types of 
errors occurred: 

1 . There were no statements after the 
header statement. 

2. The last set was an omit set. 

3. The last set was an include set, but 
it contained no field statements. 

System Action: The job will terminate at the end of the 

generation phase. 
User Response: Make one of the following corrections 

depending upon the type of error that 

occurred: 

1 . Su|)piy the sequence specifications. 

2. Eliminate this omit set, because 
the records are omitted by default. 

3. Supply the missing field statements. 
Resubmit the job. 



Code: W-Warning 

Explanation: The referenced statement is a field state- 

ment (F in column 6). The type specified 
is a zone field (Z in column 8) or a V field 
(V in column 8) which should have a 
length of one byte. 

System Action: The specified number of bytes (calculated 
using columns 9-12 and 13-16) is used in 
building the work record field for this 
record type. The byte of zone or overflow 
information generated is placed in the 
rightmost byte (low order byte) of this 
field. The other positions to the left con- 
tain binary zeros (contro! fields) or blanks 
(data fields). 

User Response: If you do not want a length of one byte, 
respond to the CI 23 halt (Model 6) or 
the 22 halt (Model 10, Model 12, or 
Model 15) with a controlled cancel (op- 
tion 2). The Halt Guide for each system 
lists all the halts and the options for each 

one. 
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SD224-COLUMNS 9-16 OR COLUMNS 20-27 ARE 
INVALID 

Code: S— Severe error 

Explanation: The location information in columns 

9-16 and/or columns 20-27 of the refer- 
enced statement is invalid for one of these 
reasons: 

1 . The from location is greater than 
the to location. 

2. The to location is blank or zero. 

3. The lengths of factor 1 and factor 
2 are not the same. 

System Action: The job ends after the generation phase. 
User Response: Correct this statement and resubmit the 
job. 



SD226--DIGIT FIELD LENGTH EXCEEDS 16 



SD230-SAME SPECIFICATION TYPE ASSUMED, 
COLUMN 6 



Code: 
Explanation: 

Systemi Action: 



User Response: 



W-Warning 

A digit field longer than 16 bytes has been 
specified in the referenced statement. 
Disk sort assumes you want a length of 
16. The job ends after the generation 
phase. 

If your digit field is longer than 16 bytes, 
divide it into two or more fields. Create 
new specifications for these fields and re- 
submit job. If your digit field is really 
16 bytes or shorter, correct the statement 
and resubmit the job. 



SD228--CHARACTER CONSTANT-LENGTH EXCEEDS 
20 



Code: 
Explanation: 



System Action: 



User Response: 



W— Warning 

The referenced statement has a blank in 
column 6, so the specification type is not 
known. However, column 7 of this state- 
ment contains an A or 0. The previous 
statement was either an include or omit 
statement (I or O in column 6). 
Disk sort assumes the statement is a rec- 
ord type one with a specification type 
identical to that of the previous state- 
ment; that is, include (I) or omit (O). 
If the statement is not a record type state- 
ment, you can cancel the job after the 
CI 23 halt (Model 6) or the 22 halt (Model 
10, Model 12, or Model 15). In either 
case, correct the statement before re- 
running the job. 



SD232-ZONE SPECIFIED-FACTOR 2 IS NOT A 
CONSTANT 

Code: S~Severe error 

Explanation: A zone was specified in column 8 of a 

record type statement (include or omit) 
and column 19 does not have a C (con- 
stant) specified. 

System Action: Disk sort bypasses the statement. The 
job ends after the generation phase. 

User Response: Correct the statement and resubmit the 
job. 



Code: W-Warning 

Explanation: The referenced statement is an include or 

omit statement (I or in column 6). 
Factor 2 contains a character constant 
since column 19 contains a C. The length 
implied in factor 1 (columns 9-12 and 
13-16) is greater than 20, which is the 
maximum length allowed. 

System Action: The rightmost 20 columns in factor 1 

will be compared against the constant in 
columns 20-39. 

User Response: If you do not want a 20-byte field you 
can end the job after the generation 
phase at the CI 23 halt (Model 6) or the 
22 halt (Model 10, Model 1 2, or Model 
15). 
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SD234-ZONE SPECIFIED- RELATIONSHIP NOT EQ 
OR NE 



SD240-UNPACKED DECIMAL-LENGTH EXCEEDS 16 



Code: 
Explanation: 



System Action: 



User Response: 



VV-Warning 

A zone has been specified in colunnn 8 of 
the referenced record type statement (in- 
clude or omit) and columns 17-18 do not 
contain EQ or NE. 

Disk sort assumes you want EO in columns 
17-18; processing of this statement 
continues. 

If you do want an EO in columns 17-18, 
you can continue the job after the CI 23 
halt (Model 6) or the 22 halt (Model 10, 
Model 12,01 Model 15). Correct the 
column 1/18 entry in the statement 
tefote the next job is run. 



SD236- INVALID RELATIONSHIP, COLUMNS 17 18 

Code: S— Severe error 

Explanation: The referenced statement is a record type 

statement (include or omit) and columns 
17 18 (the relationship between factor 1 
and factor 2) does not contain an EQ, 
NE, LT, GT, LE.or GE. 

System Action: System assumes an EQ entry in columns 
17-18. The job ends after the generation 
phase. 

User Response: Correct statement and resubmit job. 



Code: 
Explanation: 



System Action: 



User Response: 



W-Warning 

The referenced statement has a U in 

column 8. Columns 8-12 and 13-16 

specify a factor 1 field longer than the 

allowable maximum of 16 bytes. 

Disk sort processes the statement with a 

length of 16. The job ends after the 

generation phase. 

Check the to and from columns and 

correct the statement before resubmitting 

job. 



SD242-ZONE SPECIFIED-LENGTH EXCEEDS 1 



Code: 
Explanation: 



System Action: 



User Response: 



W-Warning 

The referenced statement is a record type 

specification (include or omit) with a Z 

(zone) in column 8. Factor 1 must be only 

one character long and it was not. 

A length of 1 is assumed. Column 20 in 

this statement contains the constant that 

will be processed. 

Verify that the assumption is correct. If 

it is not, you can cancel the job after the 

CI 23 halt (Model 6) or the 22 halt (Model 

10, Model 12, or Model 15). In any case, 

you should correct the statement before 

rerunning the job. 



SD238-INVALID FACIOR 2 TYPE, COLUMN 19 

Code: W- Warning 

Explanation: The referenced statement is a record type 

specification (include or omit) and column 
19 contains neither an F (field) nor C 
(constant). 

System Action: Column 19 is assumed to contain a C; 
factor 2 is taken as a constant. 

User Response: Check column 19 for an invalid character 
or missing character. If you do not want 
a C in column 19 you can cancel the job 
after the C123 halt (Model 6) or the 22 
halt (Model 10, Model 12, or Model 15). 
In any case, you should correct the 
statement befoi e running the job. 
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SD244-PACKED DECIMAL-LENGTH EXCEEDS 8 



SD248-ILLEGAL FORCE-ALL CONTINUATION 



Code: 
Explanation: 



System Action: 



W-Warning 

Field length excessive. The P (packed) 
in column 8 dictates that the field must 
be only eight columns long (15 digits plus 
sign). 

The specified number of bytes (calculated 
from columns 9-12 and 13-16) are used in 
building the work record field for this 
record type. Eight bytes of input 
information are used; the remainder of 
the field is unpredictable. The 
rightmost eight bytes of the field are used 
for include or omit. If column 19 contains 
a C, the constant in columns 20-35 of this 
statement is used for factor 2. 
If you do not want to accept disk sort's 
assumptions, you can cancel the job after 
the C123 halt (Model 6) or the 22 halt 
(Model 10, Model 12, or Model 15). 
In any case, you should correct the 
statement before running the job again. 



SD246- -INVALID FIELD TYPE SPECIFICATION, 
COLUMN 7 



User Response: 



Code: 
Explanation: 



System Action: 



User Response: 



W-Warning 

The referenced statement is a field specifi- 
cation; however, column 7 does not con- 
tain an F, N, O, D or S. 
The referenced field statement will be 
assumed as an N (normal control field) 
if there have been no previous data or 
summary data field specifications for 
this include set. Otherwise it will be 
assumed to be a D (data field) specification. 
If you do not want an N in column 7, you 
can cancel the job after the CI 23 halt 
(Model 6) or the 22 halt (Model 10, 
Model 12, or Model 15). In any case, 
you should correct the statement before 
running the job again. 



Code: S— Severe error 

Explanation: The referenced statement is a field state- 

ment for a force-all specification (F in 
column 7). However, it does not follow 
a conditional force specification as it 
should. 

System Action: Disk sort ignores the statement. The job 
ends after the generation phase. 

User Response: Correct statement and resubmit job. 



SD250-FIELD STATEMENTS IN WRONG LOGICAL 
ORDER 

Code: S— Severe error 

Explanation: The referenced statement is a control 

field specification. However, a data (D) 
or summary (S) specification was previous- 
ly specified in this include set. All control 
field statements (N, O, or F in column 7) 
must precede any data or summary data 
field specifications. 

System Action: The statement is bypassed. Processing 
continues with next statement. The job 
ends after the generation phase. 

User Response: This statement is either misplaced or in- 
correctly specified. Correct the statement 
and resubmit the job. 



SD252-CONTROL FIELD LENGTH EXCEEDS 
HEADER VALUE 



Code: 
Explanation: 



System Action: 



User Response: 



S— Severe error 

The accumulated length of control field 
statements within the current include set 
exceeds length specified in header 
statement. 

Disk sort processes all the following state- 
ments in this include set but the job ends 
after the generation phase. 
Check the length specified in header line 
against the specified control fields. Cor- 
rect the errors and resubmit job. 
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SD254-CONTROL FIELD LENGTH LESS THAN 
HEADER VALUE 



SD262-DATA LENGTH EXCEEDS HEADER VALUE 



Code; 
Explanation: 



System Action: 



User Response: 



W— Warning 

The accumulated length of control fields 
specified for this include set is less than 
length specified in header statement. 
All control field statements have been 
processed for this include set. The re- 
maining positions are filled with binary 
zeros. 

You can continue the job after the CI 23 
halt (Model 6) or the 22 halt (Model 10, 
Model 12, or Model 15). Check control 
field length in header line before running 
the job again. 



SD256~CHARACTER FIELD SPECIFICATION- 
LENGTH EXCEEDS 256 



Code: 
Explanation: 



System Action: 



User Response: 



S— Severe error 

The referenced statement is a character 

field specification (C in column 8). A 

length of more than 256 has been specified 

on this statement. 

The job continues through the generation 

phases to diagnose the sort sequence 

specifications but terminates at the end 

of the generation phases. 

If you require more than 256 positions 

of data, split the field into more than one 

field specification statement. 



SD258-TO OR FROM FIELD NOT WITHIN INPUT 
RECORD 



Code: 
Explanation: 



System Action: 
User Response: 



S— Severe error 

Either or both specifications in the to 
or from columns are zero or contain a 
value larger than your input record length. 
This job ends after the generation phase. 
Check to make sure you have the desired 
input file. Also check that the from and 
to columns contain the desired values. 



Code: 
Explanation: 



System Action: 
User Response: 



S^Severe error 

The data field specifications (columns 6 
and 7 contain FD or FS) for this include 
set now exceed your data length value. 
A SORTR or SORTRS job was specified. 
If you are dropping the control field 
(column 28 of the header line contains an 
X), the data length is the output record 
length (columns 29-32 of the header line). 
If you are not dropping the control field, 
the control field length (columns 13-17 
of the header line) must be subtracted 
from the output record length to get the 
data field length. 

The job ends after the generation phase. 
There is an error in either the output 
record length in header line or the to 
and from fields in the field description 
lines. Correct the error and resubmit the 
job. 



SD264-SPECIFICATIONS IN WRONG NUMERICAL 
ORDER 

Code: W-Warning 

Explanation: Columns 1-5 of each sequence specif ica 

tion statement are used to order the state- 
ments. One or more of the statements 
has a value in columns 1-5 that is less 
than the preceding statement. Disk sort 
prints an S to the left of the statements 
that are out of order. 

System Action: Disk sort assumes the specification state- 
ments are in the order you want. 

User Response: Check the order of the sequence specifica- 
tions. If they are out of order, respond 
to the CI 23 halt (Model 6) or the 22 halt 
(Model 10, Model 12, or Model 15) 
with option 2. (The Halt Guide for 
each system explains the options fol- 
lowing each halt.) 



Messages 133 



SD266-FACTOR 1 LENGTH EXCEEDS 256 

Code: S— Severe error 

Explanation: The referenced statement is an include or 

omit specification for character data 
(column 8 contains a C). Factor 1 is a 
field (column 19 contains an F). The 
length of factor 1 exceeds 256 bytes. 

System Action: Disk sort assumes a factor 1 length of 

256 but ends the job after the generation 
phase. 

User Response: Break this statement into two specifica- 
tions with an AND continuation line (put 
an A in column 7). 



SD268--P OR U FACTOR 1 USED WITH ALTSEQ 

Code: W-Warning 

Explanation: The referenced include or omit record 

type statement specifies a packed or 
unpacked factor 1 and an alternate collat- 
ing sequence is specified in the header 
statement. 

System Action: Factor 1 and factor 2 are changed as in- 
dicated by the ALTSEQ statements. This 
change may affect the units position (and 
sign) of an unpacked decimal number or 
any one position of a packed decimal 
number. If it does, you may not include 
or omit the desired records. 

User Response: Do not use P or U column 8 record type 
entries when you specify an alternate 
collating sequence. 



SD270-INVALID SPECIFICATION WITH TRANSLATE 
ON 



Code: 
Explanation: 



System Action: 
User Response: 



S— Severe error 

If input is on 7-track tape with TRANS- 
LATE-ON, include, omii, or field specifica- 
tions with packed data are not allowed. 
If output is on 7 track tape with TRANS- 
LATE-ON, field specifications with 
packed data are not allowed. 
The job ends after the generation phase. 
Either correct the invalid specifications, 
change the output file to a 9-track tape 
file, 01 change the input file to a 7-track 
tape file with CONVERI ON specified. 



SD271-INVALID SPECIFICATION UNLESS CONTROL 
FIELD DROPPED 

Code: S— Severe error 

Explanation: The control field is a normal packed or 

unpacked field, or an opposite packed, 
unpacked, I'one, or character field. All 
of these control fields are modified by 
the disk sort [Jrogram and will contain 
meaningless data. 

System Action: The program ends after the generation 
phase. 

User Response: Indicate that the control field is to be 

dropped (code an X in column 28 of the 
header statement) and repeat (as a data 
field) any of the control fields you want 
in the outpiit record. 



SD269-PACKED FIELD USED WITH 96-COLUMN 
INPUT (Model 15 only) 

Code: W-Warning 

Explanation: 96-column cards can contain only the 
System/3 64-character set. Packed data 
cannot be contained on a 96-column card. 

System Action: A 22 halt is issued at the end of the 
generation phase. 

User Response: Verify that you are not trying to retrieve 
packed data from a 96-column card. The 
use of include sets may be necessary when 
using 96-column card input. 



SD276~MORE THAN ONE SUMMARY V FIELD IN 
INCLUDE SET 

Code: W-Warning 

Explanation: This is a SORTRS job. The referenced 

statement specifies a summary V field 
(FSV in columns 6-8). At least one other 
summary V field has already been speci- 
fied for this include set. 

System Action: A data V field is assumed (FDV in 
columns 6-8), 

User Response: Change the extra sumrnary V field (s) to 

data V fields before running the job again. 
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SD278-SUMIV1ARY V OR DATA FIELD INCONSISTENT 

Code: W— Warning 

Explanation: This is a SORTRS job. The referenced 

statement is a summary data field specifi- 
cation (S in column 7). Compare this 
specification with the first include set 
having S specifications; one of the follow- 
ing is true: 

• The number of S specifications prior 
to this specification differs. 

• The length of this S specification 
differs. 

• The substitution character of this V 
specification differs. 

• The relative location of the specifica- 
tion within the output record differs. 

System Action: The S specifications of the first include 
set having S specifications are used to 
actually define the summary field 
positions. 

User Response: A CI 23 halt (Model 6) or a 22 halt (Model 
1 0, Model 1 2, or Model 1 5) will occur at 
the end of the Generation Phase. Check 
carefully to assure that the first include 
set with S specifications is correct. If 
not, correct and take a 2-option (con- 
trolled cancel). 



SD282-NO SUMMARY SPECIFICATIONS FOUND- 
SORTRS JOB 

Code: W-Warning 

Explanation: A SORTRS job (summary tag along sort) 

was specified on the header statement 
for this job. However, no summary data 
field specifications were found in the 
statements for this job. 

System Action: All records with duplicate control fields 
will be eliminated from the output file. 

User Response: Check the job type to be sure that 
SORTRS was intended 



SD284-SUMMARY SPECIFICATIONS FOUND-^ 
SORTR JOB 

Code: W-Warning 

Explanation: This is a SORTR job. A summary data 

field specification (columns 6 and 7 con- 
tain FS) is expected only for SORTRS 
jobs. At least one S specification was 
found for this job. 

System Action: All S specifications are treated as data 
specifications (column 7 contains a D 
rather than an S). 

User Response: Check to assure that a SORTRS job 
was not wanted. 



SD280-NUMBER OF SUMMARY FIELDS 
INCONSISTENT 



SD286-TOO MANY SUMMARY DATA FIELDS 



Code: 
Explanation: 



System Action: 



User Response: 



W-Warning 

This is a SORTRS job. The total number 

of S specifications in this include set 

differs from the first include set having 

an S specification. 

The S specifications of the first include 

set having S specifications are used to 

actually form the summary output 

records. 

A CI 23 halt (Model 6) or a 22 halt (Model 

10, Model 12, or Model 15) will occur at 

the end of the generation phase. Check 

carefully to assure that the first include 

set with S specification is correct. If not, 

correct and take a 2-option (controlled 

cancel). 



Code: 
Explanation: 



System Action: 
User Response: 



S— Severe 

This IS a SORTRS job. More than 24 

summary data fields (FS in columns 6 

and 7 and C, D, P.. or U in column 8) have 

been specified. 

The job will end ariei the generation phase. 

Limit the number of summary data fields 

to 24 or less. 
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SD288-INVALID SORTRS SPECIFICATION- 
COLUMNS 20, 21, 22 

Code: W-Warning 

Explanation: The overflow field length in columns 20- 
22 is invalid, not right-justified, or less 
than the field length given by to and from 
entries for this specification. 

System Action: Disk sort assumes that no entry was made 
in columns 20-22. 

User Response: If a valid entry was meant for columns 
20-22, cancel the job {C123 Halt-Model 
6 or 22 halt-Model 1 0, Model 1 2, or 
Model 15), correct entries, and rerun 
the job. If no entry was meant for 
columns 20-22, the job will run but 
warning message will continue until 
error is corrected. 
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SD301-TAPE VARIABLE LENGTH BLOCK SPECIFIED 



SD391-MAIN STORAGE ALLOCATED TOO SMALL 



Code: 
Explanation: 



System Action: 
User Response: 



T— Terminal 

Variable length blocks are not allowed on 

input files. Your input FILE statement 

is incorrect. 

The job ends. 

Disk sort accepts only fixed length block 

files from tape. Specify fixed block files 

on the FILE statement. 



SD302~RECL AND/OR BLKL NOT SPECIFIED 

Code: T— Terminal 

Explanation: RECL and BLKL must be specified for a 

tape file on the FILE statement. 
System Action: The job ends. 
User Response: Specify RECL and BLKL and resubmit 

the job. 



SD303-HEADER AND TAPE OUTPUT LENGTH 
DISAGREE 



Code: 
Explanation: 



System Action: 
User Response: 



T— Terminal 

The output record length specified on the 
output FILE statement and the output 
record length specified on the sort header 
statement are not the same. 
The job ends. 

Both record lengths (output FILE state- 
ment and sort header statement) must 
agree. 



Code: T— Terminal 

Explanation: The amount of main storage assigned to 

disk sort is not large enough to handle 
the job. On the Model 15, this halt can 
occur if the system was not generated 
with the support needed for a particular 
device such as tape, 5445, or card support. 
For CCP/Disk Sort, this occurs when the 
work record length is less than three bytes. 
This halt can also occur when a CCP/Disk 
Sort module is missing from the pack on 
which the CCP/Disk Sort resides. 

System Action: This sort job cannot run. The CD45 halt 
(Model 6) or 25 halt (Model 10, Model 12, 
or Model 15) cancels the job. 

User Response: Make sure you have the right input file. 
Check the SORTR or SORTRS output 
length specified in your header line if 
this is a tag along sort. Also check that 
the total number of bytes reserved for 
the sequence specifications (message 
SD461) does not exceed the recommend- 
ed amount (see Appendix D). In addition, 
make sure there are no entries in positions 
35-39 of the header statement (reserved 
for system use). 

For CCP/Disk Sort, if the work record 
length is less than three bytes, then 
increase the control field record length 
or the output record length. 

Ensure that all the CCP/Disk Sort modules 
are on the pack. 
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SD395-NOT ENOUGH SPACE FOR WORK FILE 



SD398-WORK FILE EXTENTS NOT USEABLE 



Code: T-Terminal 

Explanation: Disk sort automatic work file allocation 

is being used. One or more of the follow- 
ing situations has occurred: 

1. The disk packs that are currently 
online cannot be used for work 
space because they contain multi- 
volume offline files or because a de- 
ferred mount is requested. 

2. No work space is available on the 
online disk packs. 

3. No work space is available on the 
disk packs indicated on the SWITCH 
statement (Model 12 and Model 15). 

The job ends. 

To make more scratch space available, 

perform one of the following: 

1. Delete unnecessary files on the on- 
line disk packs (preferably the fixed 
units). 

2. Mount a removable pack that has 
enough scratch space available. 

3. Remove or modify the SWITCH 
statement (Model 12 and Model 15). 



System Action: 
User Response: 



Code: 
Explanation: 



System Action: 
User Response: 



T— Terminal 

None of the track extents specified on 

the work FILE statement are large enough 

for a work block. 

The job ends. 

Increase the number of tracks on the 

work FILE statement so that the extents 

will be large enough to hold a work block. 
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SD401-JOB COMPLETED GENERATION PHASE 



Code: 
Explanation: 



System Action: 



User Response: 



I — Intoimation 

This job has completed the generation 
phase. All diagnostics have been checked 
for errors. 

If severe errors were found, message SD425 
and halt CD45 (Model 6) or halt 25 (Model 
10, Model12, or ModeMB) follow. If 
warning errors vi/ere found message SD422 
and halt CD1 23 (Model 6) or halt 22 
(Model 1 0, Model 1 2, or Model 1 5) follow. 
If no errors were found, the job proceeds 
to the execution phase of disk sort. 
Review subsequent messages. 



SD402-NO ERRORS FOUND 



SD422-XXX WARNING ERRORS HAVE BEEN FOUND 
0-OK, CONTINUE 
2-NOT EXPECTED, CANCEL 

Code: A— Action 

Explanation; No severe or terminal errors were found 

in the data supplied in your sequence 
specification statements. However, warn- 
ing errors were found. 

System Action: Halt CI 23 (Model 6) or halt 22 (Model 10, 
Model 12, or Model 15) occurs. 

User Response: The operator should review the warning 
errors on the listing to decide what action 
to take, and then respond to the halt with 
option (OK— continue the job) or op- 
tion 2 (errors not expected— cancel the 
job). 



Code: I — Information 

Explanation: No errors were found in the generation 

phase of disk sort. 
System Action: Processing continues to the execution 

phase. 
User Response: None. 



SD403-OPERATOR CHOSE TO CANCEL JOB 

Code: I— Information 

Explanation: Message SD422 with halt CD1 23 (Model 

6) of halt 22 (Model 10, Model 12, or 
Model 15) was just given. The warn- 
ing error was not expected, so the operator 
chose to cancel the job. 

System Action: Processing ends. 

User Response: Correct the errors and resubmit the job. 



SD423-PERMANENT I/O ERROR READING 
SPECIFICATIONS 



Code: 
Explanation: 



System Action: 



User Response: 



A-Action 

A permanent I/O error has occured dur- 
ing the reading of your sort sequence 
specifications statements. 
This disk sort job cannot continue. Halt 
CD3 (Model 6) or halt 23 (Model 10, 
Model 12, or Model 15) occurs. 
Option 3— Immediately cancel this job. 
Resubmit job. If error persists, contact 
IBM for hardware support. 



SD425-SEVERE AND/OR TERMINAL ERRORS 
FOUND 



SD404-OPERATOR CHOSE TO CONTINUE JOB 

Code: I- Information 

Explanation: Message SD422 with halt CD1 23 (Model 

6) or halt 22 (Model 1 0, Model 1 2, or 
Model 15) was just given. The warning 
errors were expected, so the operator 
chose to continue the job. 

System Action: Processing continues to the execution 
phase. 

User Response: None. 



Code: 
Explanation: 

System Action: 



User Response: 



A- Action 

Severe and/or terminal errors were found 

during the generation phase of disk sort. 

This job cannot continue. Halt CD45 

(Model 6) or halt 25 (Model 10, Model 

1 2, or Model 1 5) occurs. 

Option 3— Immediately cancel this job. 
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SD450-XX,XXX MAIN STORAGE BYTES ASSIGNED 

Code: i--lntormation 

Explanation: This is the size of mam storage In which 

disk sort ha;, betin assigned to run. 
System Action: None. 
User Response: None. 



SD451-XXXX BYTES-INPUT FILE RECORD LENGTH 

Code: i— Information 

Explanation: This is the input lecord length. 

System Action: None. 

User Response: None. 



SD452-XXXX BYTES-WORK FILE RECORD LENGTH 



SD454 XXXX BYTES-INPUT FILE BLOCK LENGTH 

'-■ '■'!': I Information 

t'xpianation: This is the block length for your Input 

file. This Information Is taken from your 

inpi.it FILE statement. 
System Action: None. 
User Response: None. 



:.!)455 XXXX BYTES-OUTPUT FILE BLOCK LENGTH 



Code: 
Lxplcination: 



!jVsif;;ri Action ; 
Use-' Response- 



I — Information 

This is the block length for your output 

file. This Information is taken from your 

output FILE statement. 

None. 

None. 



Code: I -Information 

Explanation: This is the record length for your work 

file. It was connputed trom the informa- 
tion on your headei line. 

System Action: None. 

User Response: None. 



SD453-XXXX BYTES-OUTPUT FILE RECORD 
LENGTH 



D46T-XXXX BYTES-SELECT/BUILD ROUTINE 



n;XLi:anurion: 



■ jv'sii-"' Mcnon: 
i.i',-e; Response' 



I -Information 

The seciuence specifications for this job 

(including alternate collating statements, 

if specified) will use the specified number 

of bytes of main storage. 

None. 

None. 



Code: I— Information 

Explanation: This is the record length f(,;r vour cutpu; 

file. This Information is taken fi..irn youi 

header line. 
System Action; fNlone. 
User Response: None. 



Sl)462 XXX SEQUENCE SPECIFICATION 
.:-TATFIVIENTS PROCESSED 



Coo" 
E. ><•>:£)( id 1 



Sys;!."T' Actiun: 
User Response: 



i -Information 

This IS the number of sequence specifica- 
tions statements (processed by the genera- 

iion phase) in your job. 

None. 

None. 
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SD500-5445 FEATURE NOT AVAILABLE (Model 10 
only) 



Code: 
Explanation: 



System Action: 
User Response: 



T— Terminal 

An attempt has been made to use a 5445 
disk; however, the IBM System/3 Disk 
Sort 5445 Disk Storage Drive Feature is 
not on the program pack. 
The job ends. 

Either specify another device type or per- 
form system generation with Disk Sort 
5445 support. 



SD501-DISK SORT TAPE SUPPORT NOT AVAILABLE 
(Model 10 only) 



Code: 
Explanation: 



System Action: 
User Response: 



T— Terminal 

An attempt has been made to use tape 
input or output; however, IBM System/3 
disk sort tape support is not on the pro- 
gram pack. 
The job ends. 

Either specify another device type or per- 
form system generation with disk sort 
tape support. 
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SD600-XX-FIRST PASS-#0 PASS-STARTED 



Code: 
Explanation: 



System Action: 
User Response: 



I— Information 

The execution phase of your job has 

begun. Records are being copied from 

the input file to the work file (XX = 

execution phase). 

None. 

None. 



SD601-#XX PASS COMPLETED 



NNN 



Code: I— Information 

Explanation: This is simply status information. It tells 

you that pass #XX has just been success- 
fully completed. (The first pass #00, the? 
second pass is #01, etc.) 
NNN is design information for the 
Model 15 (5704-SM9). For further 
explanation, see the diagnostic aids in 
the IBM System /3 Disk Sort Program 
Logic IVIanual, LY21-0517. 

System Action: None. 

User Response: None. 
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SD602-XXXXXX INPUT RECORDS WERE READ IN 



Code: l--lnformation 

Explanation: Number of records read from the input 

file. 
System Action: None. 
User Response: None. 



SD603-NNNNNN RECORDS WERE SELECTED TO BE 
SORTED 

Code: I -Information 

Explanation: How many of the records ]ust read in ate 

going to be sorted. 
System Action: None. 
User Response: None. 



SD605-CCP DATA TRUNCATED 

Code: l-lnformation 

Explanation: More than 80 bytes of data were passed or 

entered for the cham request. Only the 
leftmost 80 bytes of data were retamed, 
the remainder was tiuncated. 

System Action: None. 

User Response: Review your task chain request to deter 
mine the impact of the ttuncation. 



SD607-RELEASE/TASK CHAIN UNSUCCESSFUL 

Code: I- information 

Explanation: The Release and Task Cham request 

could not be completed. Cnlum.n 39 
of the header statement contains a T 
indicating Release and Task Chain, but 
the sort program received control from 
the console or from a Task Chain. 

System Action: A Task Chain operation will be 
attempted. 

Check column 39 of the header statement 
and review your Release and Task Chain 
request. If symbolic files arc used, the 
symbolic file reference will be lost. 



SD62C--NO INPUT RECORDS WERE SELECTED TO BE 
SORTED 



Code- 

Explanation: 



Cy^t,-:- Acl.Dn- 
User Response 



A-Action 

Of the numbet of input records spec. tied 

in message SD602, none o' them inet the 

INCLUDE requirements o' vour sort 

sequence specifications 

Halt CI 234 (Model 6) or halt 2C (Model 10, 

Model 12, or Model 15) occurs. 

Take option to continue thi.- ,01) and 

ct.'dte a null output fiie or take option 3 

(im;mediate cancel'. Review vour seauence 

specifications in light of the records actual 

ly in your inpu* file'. 



SL>681 WORK RECORD COUNT iN ERROR 

Code: T— Terminal 

Expianaton. Disk sort iniernai error. 

System Action: The job Terminates. 

User Response; Collect pertinent information and contact 
IBM for programming support. 



SD690-DiSK SORT STARTING FINAL PASS 



Code 

Explanation ■ 



User Response: 



i inlormation 

Tlie final pass of this sort job has begun. 

Records are being written on your output 

file. 
Systeni Action : None 
User Ficsponse None. 



SD900 ^ASK CHAIN UNSUCCESSFUL 

Code: L-lnformation 

Explanation: The task chair-i retiuest could not be 

comipleted. 

System Action. None. 

User Response: Ensure that your task chain request is 

correct, and determine the impact ot an 
unsuccessful chain on your |ob stream. 
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SD691-FINAL PASS SUCCESSFULLY COMPLETED 



SD694-XX PASSES REMAINING 



NNN 



Code: I — Information 

Explanation: The last pass of this sort was just success- 
fully completed. 
System Action: None. 
User Response: None. 



SD692-XXXXXX SORTED RECORDS PLACED ON 
OUTPUT FILE 



Code: I— Information 

Explanation: This is the number of passes remaining until 
job completion. NNN is design information 
for the Model 1 2 and Model 1 5. For further 
explanation, refer to the diagnostic aids in 
the IBM System/3 Disk Sort Program Logic 
l\/lanual, LY21-0517. 

System Action: None. 

User Response: None. 



Code: I — Information 

Explanation: The last pass of this sort was just success- 
fully completed. The output record selec- 
ted and generated from the input records 
have been sorted and placed on your out- 
put file. 

System Action: None. 

User Response: None. 



SD695-XXXX USED FOR WORK FILE 

Code: l~lnformation 

Explanation: This is the number of tracks of work file 

used in this sort. 
System Action: None. 
User Response: None. 



SD693-NO INPUT RECORDS FOUND 

Code: A-Action 

Explanation: No records were found in the input file. 

System Action: Halt C1234 (Model 6) or halt 2C (Model 
10, Model 12, or Model 15) occurs. 

User Response: Check input file to ensure that it is the 

proper file and contains records you want 
to sort. Take option to continue the 
job and create a null output file or take 
option 3 (immediate cancel). 
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SD711-M0UNT OUTPUT TAPE 



SD929-WORK FILE PERMANENT I/O ERROR 



Code: A-Action 

Explanation; The output tape is not required until the 
intermediate merge passes are done. 

System Action: The program halts. 

User Response: Mount the tape. If the output file uses 
the same tape drive as the input file, re- 
move the input file and replace it with 
the output file reel. Do not reply to the 
halt until the output file reel is mounted. 



Code: 
Explanation: 



System Action: 



User Response: 



A-Action 

A permanent unrecoverable I/O error has 

occurred during the reading of records 

from your work file. 

The job cannot continue. Halt CD4 

(Model 6) or halt 29 (Model 10, Model 

12, or Model 15) occurs. 

Option 3 (immediate cancel). Resubmit 

the job. If error persists, contact IBM 

for hardware support. 



SD92A-OUTPUT FILE PERMANENT I/O ERROR 



SD901 



* * ■«- ■*(■ ■((- 



NORMAL EOJ 



* * * * ■}(■ 



Code: 

Explanation: 
System Action: 
User Response: 



I — Information 

The sort job has been completed. 

None. 

None. 



SD902- 



*ABNORMAL EOJ* 



Code: 
Explanation: 



I— Information 

Errors have prevented the sort job from 

being run. 
System Action: None. 
User Response: Review previous messages, correct errors, 

and resubmit job. 



SD928-INPUT FILE PERMANENT I/O ERROR 



Code: 
Explanation: 



System Action: 



User Response: 



A-Action 

A permanent, unrecoverable I/O error has 

occurred during the reading in of records 

from your input file. 

The job cannot continue. Halt CI 25 

(Model 6) or halt 28 (Model 10, Model 

12, or Model 15) occurs. 

Option 3 (immediate cancel). Resubmit 

the job. If error persists, contact IBM for 

hardware support. 



Code: 
Explanation: 

System Action: 



User Response: 



A-Action 

A permanent unrecoverable I/O error has 

occurred writing to your output file. 

The job cannot continue. Halt CD34 

(Model 6) or halt 2A (Model 10, Model 

12, or Model 15) occurs. 

Option 3 (immediate cancel) or option 2 

(controlled cancel). Resubmit the job. 

If error persists, contact IBM for hardware 

support. 



SD92D-SORTTASK CHAIN ATTEMPT FAILED 

Code: A-Action 

Explanation: After executing a CCP/Disk Sort 

program, the attempt to chain to the next 
task was not successful. Either not 
enough task chain queues were specified 
in the assignment set, or there is 
insufficient TP buffer space. 

System Action: Message 2D (Model 15, 5704-SM7 only) 

User Response: Option 1 (retry). Attempt to execute 
the task chain again. Option 2 
(controlled cancel). The next program 
must be initiated by the operator. 
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SD92E-WORK FILE TOO SMALL 



SD92F-OUTPUT FILE TOO SMALL 



Code: A-Action 

Explanation: While building the work file, disk sort 

ran out of space. 

Systenn Action: The job cannot continue. Halt CI 245 
(Model 6) or halt 2E (Model 10, Model 
12, or Model 15) occurs. 

User Response: Option 3 (imnnediate cancel). Allocate 
more tracks for the work file, and resub- 
mit the job. If automatic work file 
allocation is being used, you can make 
more work area available by deleting un- 
necessary files (preferably on the fixed 
units), or by mounting a pack having ade- 
quate work area available. If automatic 
work file allocation is not being used, you 
can make more work area available by us- 
ing a file statement designating adequate 
work area. 



Code: A— Action 

Explanation: When calculating the number of tracks 
needed for the output file, disk sort 
found that the output file was too small, 
or while writing to the output file, disk 
sort ran out of space. 

System Action: Halt CD2 (Model 6) or halt 2F (Model 10, 
Model 12, or Model 15) occurs. 

User Response: Option 1 (controlled cancel). If the halt 
occurs prior to the intermediate passes of 
the sort, another halt will be likely to 
occur in the later phases. A 1 -option will 
allow the sort to take place and records 
to be put on the output file until no more 
space is available. Option 3 (immediate 
cancel). Either allocate more tracks for 
a disk output file or use a larger tape reel 
or multireel for a tape output file. Resub- 
mit the job. 
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Appendix G. Instructions for Executing the Disk Sort Sample Program 



When you receive the disk sort program, perform the follow- 
ing installation procedures; 

1 . If you received the disk sort program with the system 
control programs and have performed the program 
product generation during system generation, go to 
step 3. 

2. For your system, perform the operations for Program 
Product Generation and Completing System Genera- 
tion described in the Operator's Guide 

3. You should now verify that the disk sort program is 
operational by executing the disk sort sample pro- 
gram. General operating procedures for disk sort may 
be found in the Operator's Guide. To execute the 
sample program, perform the procedure un6ex Sample 
Program; to execute it on the Model 6, perform the 
procedure under Sample Program for Model 6. 

Note: There is no sample program for CCP/Disk Sort. 



Sample Program for Model 6 

For the Model 6, the disk sort sample program is a procedure 
on the distribution disk cartridge. 

Mount distribution disk cartridge on R1 and set the DISK 
DRIVE 1 ON/OFF SWITCH to ON. When the disk drive 
is ready for use, move PROGRAM LOAD switch to ON. 

You must now respond to the keywords that appear on the 
data entry keyboard. 



Keyword 

DATE- 

READER- 
READY- 

LOAD 



NAME- 



Your Keyboard Response 

mmddyy (current month, 
date, and year) and press 
PROG START. 

Press PROG START. 

LOAD and press PROG 
START. 

SD$SPL and press PROG 
START. 





UNIT- 


R1 and press PROG START. 


DATE 


(mm/dd/yy) — 


Press PROG START. 


SWITCH 


(00000000)- 


Press PROG START. 


FILE 


NAME- 


INPUT and press PROG 
START. 




UNIT- 


R1 and press PROG 
START. 



PACK- 

LABEL- 

RECORDS- 

TRACKS- 

LOCATION- 

RETAIN- 

DATE- 



Enter the proper pack 
identification and press 
PROG START. 

Press PROG START. 

Press PROG START. 

1 and press PROG START. 

Press PROG START. 

T and press PROG START. 

Press PROG START. 
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Keyword 

FILE 
MODIFY 



READY- 



CALL 



Your Keyboard Response 

NAME- Press PROG START. 

RUN and press PROG 
START. $G RECL-0096, 
REC#-000064and press 
PROG START. 

CALL and press PROG 
START. 

NAME- SDSSPI and press PROG 
START. 



UNIT- R1 and press PROG START. 

These are all the responses that you must make. When the 
sorted file is printed, the records should be in descending 
order in columns 10-15. When the READY keyword appears, 
the sample program has ended. 



Sample Program for Model 8, Model 10, Model 12, and 
Model 15 

For the Model 8, Model 10, Model 1 2, and Model 1 5, the 
disk sort sample program is a procedure on the distribution 
disk cartridge. 

With the system on F1, mount distribution disk cartridge 
on R1 and set the DISK DRIVE 1 ON/OFF SWITCH to ON. 
The READY light indicates when the disk drive is ready for 
use. If the system input device is other than the MFCU, 
set the ADDRESS/DATA switches as required. Set the 
PROGRAM LOAD SELECTOR to REMOVABLE DISK. 
Press PROGRAM LOAD, and enter the following 
statements via your system input device. 

// DATE mmddyy 

// LOAD$DSSPL, R1 

// FILE NAME-INPUT, UNIT-R1 , PACK-XXXXXX, 

TRACKS-1 
// RUN 

$G RECL-0096, REC #000064 
/& 

//CALL$D$SP1, R1 
// RUN 

where 

mmddyy = correct date. 

XXXXXX = proper pack identification. 

These are all the entries that you need to make. As the 
sorted file is printed, the records should be in columns 10- 
15. The READY light indicates that the sample program 
has ended. 

For the Model 8 or Model 10, EJ is displayed when the 
file to be sorted has been built. To continue with the 
sort job, press console START or, if you have DPF, the 
program 1 HALT/RESET key. 
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Appendix H. CCP/Disk Sort Specifications Differences 



This appendix is designed as a reference guide for the 
follovi/ing System/3 CCP/Disk Sort users: 

• IVlodel 4, Progrann Number 5703-SI\/12 

• Model 15, Program Number 5704-SM7 



CCP/DISK SORT OVERVIEW 

The IBIVl System/3 CCP/Disl< Sort Program is a disk-resident 
program which sorts a data file into either ascending or 
descending sequence. The sorting is executed under the 
control of the Communications Control Program (CCP) on 
System/3 Models 4 or 15. Any disk file organization sup- 
ported by the System/3 disk system management may be 
used as input to the sort. This includes indexed, direct, 
and sequential files. 

The user supplies OCL statements and sort specifications 
to the CCP/Disk Sort generator program ($DGSRT). 
$DGSRT does not run under control of CCP; rather, it 
generates an object program that can later be executed 
as a user task under CCP control. This same object program 
can also execute in a batch mode, rather than under CCP. 
In order to execute the object program, either in batch 
mode or under CCP, the entire CCP/Disk Sort Program 
($DG.ALL) must be present on the program pack during 
I generation and execution. 

The CCP/Disk Sort Program requires the use of the Overlay 
Linkage Editor during the generation phase. The Overlay 
Linkage Editor must reside on the same pack on which the 
CCP/Disk Sort Program resides. 

OCL statements for $DGSRT can be supplied from the 
system input device or from a procedure library member. 
Sort specifications can be supplied from the system input 
device, from a procedure, or from a source library member. 

A listing of the sort specifications and informational 
messages is optional. (See column 27 in Chapter 3.) When 
requested, they are listed on the printer only if log on is 
specified. 

The number of sort specifications may be more limited 
when generating a CCP/Disk Sort program because it must 
run in a minimum of 12 K bytes of main storage. 



FILE STATEMENT CONSIDERATIONS 

For CCP/Disk Sort generation, the FILE statements for 
input, work, and output are needed to provide the 
LABEL parameters. The LABEL parameters are used as 
the file NAME for the object program execution. This is 
done so that multiple sorts can be executed in a single 
CCP session. 

If any of the sort files (input, work, and output) are 
physically online during generation, the FILE statement 
must be valid for that file. 

If the sort file is not online the FILE statement must 
still be syntactically correct and contain a TRACKS 
parameter and a valid LABEL parameter. The UNIT and 
TRACKS parameters do not have to be the actual values 
to be used when running the sort, but they must be present. 
The UNIT parameter cannot specify a nonremovable unit. 

SSOURCE and SWORK files must be provided for the 
generation of the object module, and both files must 
reside on a 5444 simulation area. 
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Multiple Input Files (Model 15 only) 

Input can be from either of the foliowing devices: 

• 3340 Direct Access Storage Facility 

• 3344 Direct Access Storage 



Up to eight files can be used as input using any combinatic 
of tne preceding devices. The Uaj lian.ui :or gL-n._:.j*;,.r; nit 
be INPUT or INPUT1 (but not both), iNPUT2, INPUTS. 
INPUT4. INPUTS, INPUTS, INPUT/, and/or INPUTS'. 

The flies are processed INPUT (or INPUT!) senaiiy to 
INPUTS regardless of the order of the OCL Fl LE state 
ments. The lowest numbered input file Is processed fully 
first, then the next numbered input file will be processed 
in its entirety, then the next until all the files have been 
individually processed in sequence. For a particular disk 
sort run, the input files do not have to be numbered 
serially; that is, the file names may be INPUT3, INPUTS, 
and INPUTS' , or a particular run could have just INPUTS 
as the input file. 



Work Record Length 

Work record lengths cannot be less than three bytes. This 
means that the length of the sort control field, plus the 
length of the data fields (if any), must be three bytes or 
greater. If the work record length is less than three bytes, 
a dpagriostic message (SD3g1; win oe issued during sort 
generation and the sort cannot be executed. If necessary, 
specify a minimum 3-byte control field which you can 
Jiop ;X ;ri c:.jiaiiiii 28 ot the i'i6u.,uf stjiernenLi at output 
time. Be careful, there may be data m portions of the 
control field that may be required In the output record. 

Note: The work record length discussed is not the value 
specified in the CCP DISKFI LE statement. The record 
length specified in the DISKFILE statement for the work 
file must always be 256. 



Note: The record lengths of all disk tiles must be the same. 
Also note that the UNIT parametet is used. 



The LABEL parameters are used as the file IMAWIE for the 
object program execution. 



Output File Over Input File Considerations for Model 4 



If Input File Is 


Output Over 


Input? 


Direct (See Note) 


No 


Indexed (See Note) 


No 




Sequential 


Yes 




Note: Addrout sort is 


recommended. 
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CCP/Disk Sort Object Program Generation Job Stream 
Example 



O Q 


// LOAD$DGSRT,unit 


B 


//COMPILEOBJECT-XX, (LINK ADD-8000) 


D 


// FILE NA1V1E-$SOURCE,TRACKS-10, . . . 


D 


// FILE NAME-$WORK,TRACKS-10 


B D 


// FILE NAME-INPUT,LABEL-SAMPIN (file description) 


D D D 


// FILE NAIVIE-WORK.LABEL-SAIVIPWK (file description) 


B D 


// FILE NAME-OUTPUT,LABEL-SAMPOT (file description) 


// RUN 


03 


(header specification) 


ED 


(record type specifications) 


m 


(field specifications) 


/* (end of file) 






Use either 




statement 


//END 





$DGSRT is the CCP/Disk Sort module name. 

The unit parameter specifies the pack on which 
the CCP/Disk Sort program resides. The codes 
are F1, R1, F2, or R2. 

The COMPILE statement is valid for the Model 
1 5 only. The OBJECT parameter specifies the 
unit on which the object program is to be 
catalogued. 

The overlay linkage editor requires that the 
$SOURCE and $WORK files be 10 tracks. 



The LABEL keyword identifies the actual input 
file name at execution time (infile — see item ^m 
of CCP Assignment Set Statement Example) . 

Same as for Disk Sort (see the discussion on OCL 
Statements in Chapter 2). Also see the heading 
File Statement Considerations in this appendix. 

The FILE statement for WORK must be present in 
CCP/Disk Sort. 

The LABEL keyword identifies the actual work file 
name (wrkfil — see item ^^ of Example, CCP 
Assignment Set Statements. 
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|il The LABEL keyword identifies the actual output 
file name (outfil - see item ^% of CCP Assignment 
Set Statement Example). 

[Jj] The header specification field definitions for col- 
umns 1-34 for CCP/Disk Sort are the same as those 
defined for disk sort (see Chapter 3). 

CCP/Disk Sort header specification field definition 
variations for columns 35-80 follows. 



Columns 35-36 are reversed for system use. 
Column 35 cannot be used because only one sort 
algorithm exists. 

Columns 37-38 contain the Model 15 storage size 
required to execute the object module. Specify 
a value from 12K to 48K in 2K increments. 
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Columns 44-72 contain any comment you wish to 
use. 

Note: If you are redoing the header statement for a 
program not previously used by CCP/Disk Sort, 
remember to rewrite the comment since columns 
40-43 now contain data of a different nature. 

Columns 73-74 are not used. 

Columns 75-80 contain the name given to the object 
program. This is the name that you enter from the 
terminal to invoke the sort. The entry can be: 

1. A valid program name. The first character 
must be alphabetic, but cannot be a #, $, or 
@ character. The remaining characters must 
be alphameric with no embedded blanks or 
special characters. 

2. Blank. The default is SRTOBJ. 

Note: DIR, ALL, and SYSTEM are reserved names 
and must not be used as program names. 

Qj For record type specifications, see Chapter 4. 

12 For field specifications, see Chapter 5. 



Column 39: Model 4 must contain an R, which 
indicates that a record length exists in columns 
40-43. Model 15 must contain either a C or an R. 
A C indicates that the sort chains to the next task. 
An R or C indicates that a record length exists 
in columns 40-43. 

Note: For program numbers 5799-ATF, 5799-ATG, 
and 5799-ATH, column 39 can contain only an R. 

Columns 40-43 contain the input file record 
length, right justified with or without leading 
zeros. 

Note: If a user comment exists in columns 40-43, 
you must either shorten the comment or remove it. 
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CCP Assignment Set Statements Example 



o 



// DISKFILE NAME-SAMPIN,ORG-C,RECL-aaaa 



o 



II DISKFILE NAI\/lE-SAMPWK,ORG-C,RECL-256 



G 



//DISKFILE NAME-SAMPOT,ORG-C,RECL-bbbb 



// PROGRAM NAIVIE-anynam,PGMDATA-YES,SORT-YES, 



o e o 

FILES-'SAIVIPIN/CG/NOSHR,SAMPWK/CA/NOSHR,SAMPOT/CO/NOSHR' 



SAMPIN (infile) is the same LABEL keyword given 
for FILE NAME-INPUT in the job stream (see item 
jcl i n the Sample CCP /Disk Sort Job Stream ) . 
This file can be SHR or NOSHR and the value of 
aaaa is the same value used in columns 40-43 of 
the header statement (record length). 

SAMPWK (wrkfil) is the same LABEL keyword given 
for FILE NAME-WORK in the job stream (see item 
O m the Sample CCP/Disk Sort Job Stream). 
This file must be NOSHR and RECL must be 256. 

SAMPOT (outfil) is the same LABEL keyword given 
for Fl LE NAME-OUTPUT in the job stream (see 
item Q in the Sample CCP/Disk Sort Job Stream). 
This file must be NOSHR. The value of bbb can be: 

• The value specified in columns 29-32 of the 
header statement. 

• A 3 if SORTA is specified. 
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CCP/Disk Sort Execution (Batch Mode) Job Stream 
Example 



D 

// LOAD name, unit 


B 


// FILE NAME-SAMPIN,UNIT-xx 


,PACK-xxxxxx,. . . 

B 


// FILE NAME-SAMPWK,UNIT-xx,PACK-xxxxxx,. . . 

B 


// FILE NAME-SAIV1P0UT,UNIT- 

// RUN 


xx,PACK-xxxxxx,. . . 



The name is the name given to the object 
program in columns 75-80 of the header card at 
generation time. If no name was specified, 
the default is SRTOBJ. 

These parameters must all be correct for the 
input, work, and output files. 
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Appendix I. CCP/Disk Sort Program for System/3 Models 8, 10, 12, 15A, 15B, and 15C 



Appendix I points out the differences between the 
CCP/Disk Sort Progranns for IVlodels 8, 10, 12, and 15A, 
15B, and 15C and the corresponding Disk Sort Program 
for these systems. For a description of the CCP/Disk 
Sort Program, refer to Appendix H of this manual. 

These CCP/Disk Sort Programs are classified as 
programming RPQs (request for price quotation) rather 
than as Program Products. Your IBM marketing represen- 
tative can provide information about RPQs. 

Note: Automatic work file allocation is not supported 
by CCP/Disk Sort Programs. 



CCP/DISK SORT PROGRAM (PROGRAM NUMBER 
5799-ATF) 

This CCP/Disk Sort Program is used on System/3 Model 8 
or 1 0, and operates under control of SCP 5702-SC1 . The 
generated object program can be executed under control 
of the Communications Control Program (program number 
5702-SC1, feature 6033). The CCP/Disk Sort Program 
(program number 5799-ATF) is functionally identical 
to the Disk Sort Program for the Models 8 and 10 
(Program Product number 5702-SM1). 

Using CCP/Disk Sort, sort generation requires 12K bytes 
of main storage and a 5444 Disk Storage Drive. 

To execute the generated sort program, 12K bytes of main 
storage is required. The following devices are supported 
for the input, work, and output files: 

• 5444 Disk Storage Drive 

• 5445 Disk Storage 

• 5448 Disk Storage Drive 



CCP/DISK SORT PROGRAM (PROGRAM NUMBER 
5799- ATG) 

This CCP/Disk Sort Program is used on System/3 Model 12 
and operates under control of SCP 5705-SC1. The 
generated object program can be executed under control 
of the Communications Control Program (program number 
5705-SC1, feature 6070 or 6071). The CCP/Disk Sort 
Program is functionally identical to the Disk Sort Program 
for the Model 12 (Program Product number 5705-SM1) 
with one exception, only one input file can be specified 
on this CCP/Disk Sort Program. 

Using CCP/Disk Sort, sort generation requires 12K bytes 
of main storage and a 3340 Direct Access Storage 
Facility. 

To execute the generated sort program, 12K bytes of 
main storage is required. Input, work, and output files 
can reside in the main data area or in the simulation area 
of a 3340 Direct Access Storage Facility. 



CCP/DISK SORT PROGRAM (PROGRAM NUMBER 
5799-ATH) 

This CCP/Disk Sort Program is used on System/3 
Model 15A, 15B, or 15C and operates under control of 
SCP 5704-SC1. The generated object program can be 
executed under control of the Communications Control 
Program (program number 5704-SC1, feature 6033, 6070, 
or 6071). The CCP/Disk Sort Program is functionally 
identical to the Disk Sort Program for the Model 15 
(Program Product number 5704-SM1) with one exception, 
the only devices supported by the CCP/Disk Sort Program 
for the input, work, and output files are the following: 

• 5444 Disk Storage Drive 

• 5445 Disk Storage 

• 3340 Direct Access Storage Facility 

In using CCP/Disk Sort, sort generation requires 12K bytes 
of main storage. 

To execute the generated sort program, from 12K to 48K 
bytes can be specified; however, the maximum task size 
under CCP is 32K bytes. 
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Appendix J. Glossary 



ADDROUT sort: The type of sort where the output 
consists of record addresses in the input file. 

alphabetic character: Letters A through Z and special 
symbols #, $, and @, 

alphameric character: The alphabetic characters defined 
and numeric characters 0-9. 

block: A predefined unit of storage space for files on the 
disk. For example, 1 block = 2560 bytes. 

byte: The representation of a character by eight binary 
digits; the amount of storage required for one EBCDIC 
character. 



generation phase: The part of the sort program that trans- 
lates the sequence specifications into machine language. 

input: Data transferred to computer storage for processing. 

integer: A whole number stored in hexadecimal (binary) 
form. 

library: An area on disk that contains procedure members, 
source members, load members, and subroutine members 
as well as areas required by the system control program. 
For example, sort is stored in the library. 

normal control field: Any control field that is specified by 
an N in column 7 of the field sequence specifications. 



conditional force: The control field character is replaced 
before the record is sorted, only if the control field in the 
input record contains a particular entry. 

constant: Data that does not change during execution of 
a program. 

control field: One or more specified fields that are com- 
pared to determine the record sequence in the output file. 

data: A collection of facts, numbers, letters, and symbols 
that can be processed by a computer. 

data field: See field. 

execution phase: The part of the sort program that gets 
the records you want to sort, sorts the records, and writes 
the sorted records onto the output file. 

field: One or more adjacent record positions that contain 
related information. 

file: An organized collection of related records. 

file description: The specification for the arrangement of 
fields within a record and records within a file. 

forced control field: A one-position control field that 
results from replacing the value or adding a value. 



OCL: Operation control language. 

OCL statement: A statement that identifies the job and its 
processing requirements to the control program. 

opposite control field: Any control field that is specified 
by an in column 7 of the field sequence specifications. 

output: Data transferred from computer storage to printed 
form, disk, or to the display screen. 

output file: File resulting from the sort. 

overflow field: In a summary tagalong sort, the field that 
allows for anticipated field expansion. 

packed data field: Each byte within a field represents two 
numeric digits except the low-order byte, which contains 
the sign. For non low-order bytes, bits 0-3 for one digit; 
bits 4-7 for one digit. 

procedure: A named collection of related OCL statements, 
and possibly control statements that perform a particular 
task. 

procedure member: A procedure stored in the library. 

program date: The date associated with a program 
(job step). 
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real number: A number stored in IBM System/360 
floating-point format, in which the leftmost byte contains 
the sign and exponent (decimal location) and the remaining 
bytes contain the fraction or mantissa in left-justified 
binary form, 

record: A collection of related data, treated as a unit. For 
example, one line of an invoice might form a record. 

relative record number: In a direct file, the location of a 
record in relation to the beginning of the file. 

right-justify: The placement of data in a field with the 
last significant byte in the rightmost position. 

sequence specification. Defines the arrangement of a file. 

source member: A collection of records used as input to a 
program such as RPG II specifications or sort sequence 
specifications. Source members are stored in the library. 

summary data field. In a summary tagalong sort, a data 
field designated for accumulated totals. 

summary tagalong sort: A type of sort that arranges 
records by a specified control field and accumulates totals 
from specified fields within those records. 

tagalong sort: A type of sort that arranges records by a 
specified control field and includes other specified data 
fields in the output. 

unpacked data field: Each byte within a field represents 
one numeric digit. Bits through 3 are reserved for the 
sign; bits 4 through 7 are the numeric portion. 

work file: An area reserved on the disk for temporary 
storage of the data being sorted. 
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relation (columns 17-18-record type specifications) 

effect on omitting or including records 34 

to specify factor 1 and factor 2 comparison 34 
replacements for more than one character (column 19-field 
description specifications), when and how to indicate 46 



packed numeric data 

number of bits in each digit 32 

position of sign code 32 

possible positive and negative sign codes 32 
packed, unpacked, opposite character, or opposite zone 

control fields 41 
page number (columns 1-2) with line number (columns 3-5) 

for sequencing (see line number) 
print option (column 27— header specifications), information 
disk son can print 24 
programming considerations 

card input 97 

data station input 97 

moving a character 97 

using disk sort 1 8 



record length (columns 40-43-header specification for CCP/disk 
sort), to specify 25, 151 
record length code (column 39— header specification for 

CCP/disk sort), to specify value 25, 151 
record size 

calculating for tag along (SORTR) sort 24 

effect on sort time 110 
record type specifications (disk sort and CCP/disk sort) 

column summary 26 

column 6 (line type) 27 

column 7 (continuation or comments) 30 

column 8 (C/Z/D/P/U) 30 

column 19 (field or constant) 35 

columns you must fill in 26 

columns 1-2 (page number) 27 



sample disk sort timings 114 
sample jobs 

using addrout (SORTA) and tag along (SORTR) 
sorts 55 

using signed control fields 72 

using summary (SORTRS) sort 67 
sample program 

instructions for executing on Model 6 146 

instructions for executing on Models 8, 10, 1 2, and 
15 147 
sequence 

changing collating sequence of one character 108 

changing collating sequence of several characters 108 

standard and alternate collating 107 
sequence (column 1 8--header specifications), to indicate 

record sequence 23 
sequence error message 

field description specifications 38 

header specifications 23 

record type specifications 27 
sequencing 

on field description specifications 38 

on header specifications 23 

on record type specifications 27 

using control fields 42 
sequence specifications 

for a summary tag along sort (SORTRS) 21 

for a tag along sort (SORTR) 19 

for an addrout sort (SORTA) 20 

how number of affects sort time 1 1 1 

how to enter during BUILD cycle 98 

how to enter during CALL cycle 99 

how to enter during LOAD cycle 94 

how to enter when in KSE-created source library entry 94 

how to supply 103 

inserting new ones in field description lines 38 

inserting new ones in record type lines 27 
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sequence specifications (continuedl 

interrelationship with conversational OCL 101 

maximum number 86 

normal order 8 

recommended number for sort job 111 

using additional to decrease sort time 111 

ways to supply for Model 6 101 
sequence specification sheet 

location and purpose of specification types 7 

types of specifications 7 
set 

include set 28 

mixing include and omit sets 29 

omit set 29 

rules for using include and omit sets 28 

types of include sets 28 

types of omit sets 29 
seven-track tape considerations 1 5 
severe error message (S) 121 
sign code 

packed and unpacked numeric data 32 

placement in packed and unpacked numeric data 33 
signed numbers 

hovu to code when used as factor 2 (columns 20-39— record 
type specifications) 35 

possible sign codes 32 
size of main storage, effect on sort time 1 10 
sizes of records, effect on sort time 110 
sort jobs 

examples of addrout and tag along sorts 55 

examples of summary sorts 67 

information you must supply with OCL 9 

types 5 
sort time 

affected by location of files 111 

affected by main storage size 110 

affected by number of records 110 

affected by number of sequence specifications 111 

affected by order of control fields 113 

affected by record size 110 

affected by using alternate collating sequence 111 

affected by using automatic work file allocation 1 1 3 
SORTA (addrout sort) 

contents of sorted records 5 

example 58 

sequence specifications 20 

using summary data fields 40 
sorted file, contents 6 
SORTR (tag along sort) 

calculating output record length when dropping control 
fields 23 

calculating output record length when not dropping 
control fields 23 

contents of sorted records 5 

function 5 

sequence specifications 19 

using summary data fields 40 
SORTRS (summary sort) 

contents of sorted records 6 

examples 67 

sequence specifications 21 

using overflow indicator fields 52 

using summary data fields 40 
source library member 103 



standard collating sequence 

specified on header line (column 26) 23 

table 106 

when digit portion is used 107 

when zone and digit portions are used 107 

when zone portion is used 107 
storage, main 

amount used by sequence specifications 1 1 1 

how size affects sort time 110 
summary data fields 

how overflow indicated 52 

how to define 40 

maximum number defined 40 

used by each type of sort 40 
summary overflow field 

how to define 46 

how to initialize 52 
summary sort (SORTRS) (see SORTRS) 
summary sort overflow 52 
summary tag along sort (see SORTRS) 
supplying sequence specifications for Model 6 

advantages and disadvantages of methods 100 
System/3 data 

alphameric 31 

how characters represented with the computer 31 

how signed numeric constants represent on record type 
specifications 35 

how to interpret 31 

in compare operations 30 

numeric data 31 

zone and digit portion of characters 31 



tag along and addrout sorts, comparison 1 4 

tag along sort (SORTR) (see SORTR) 

temporary file, additional OCL statements needed 9 

terminal message (T) 110 

time to sort a file 

addrout and tag along sort comparison 14 
affected by alternate collating sequence 1 1 1 
affected by file location on disk 111 
affected by main storage assigned to disk sort 1 1 
affected by number of input records 110 
affected by number of sequence specifications 111 
affected by order of control fields 1 13 
affected by size of records 1 1 

timing 

factors affecting sort time 17 
samples 114 

to entry (columns 1 3-1 6— field description specifications) 
describing one character field 45 
to indicate last position of field in input record 44 

to entry (columns 24-27-record type), to identify last 
position of factor 1 in input record 35 

translation table and alternate collating sequence sheet 109 
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unconditional force 

example 47 

explanation 39 
unconditional force character, how to define 46 
unpacked numeric data 

number of bits in each digit 32 

position of the sign code 33 

possible positive and negative sign codes 32 
using duplicate control fields 40 



warning message (W) 110 
work file 

calculating storage tracks for 116 

considerations 13 

considering size when programming 18 

defined during BUI LD cycle 96 

defined during LOAD cycle 93 

how position on disk affects sort time 111 

OCL statements needed to describe if temporary 
work record length 

affected by type of output 116 

affected by type of sort 1 16 
work record, how used by disk sort 4 



zone, portion of Svstem/3 character 31 



7-track tape considerations 15 
9-track tape considerations 16 
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